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PREFACE 

This manual describes how to use the various time-sharing features of CP-V. It presents an introductory subset of the 
features in a format that allows the user to learn the material by using the features at a terminal as he reads through 
the manual. A closely related manual, the CP-V Time- Sharing Reference Manual, 90 09 07, is the principal source 
of information for the time-sharing features of CP-V. It defines the rules for using the Terminal Executive Language 
and other on-line processors. 

Manuals describing other features of CP-V are outlined below: 

• The CP-V Batch Reference Manual, 90 17 64, is the principal source of reference information for the batch pro- 
cessing features of CP-V (i.e., job control commands, system procedures, l/O procedures, program loading and 
execution, debugging aids, and service processors). 

• The CP-V Remote Processing Reference Manual, 90 30 26, is the principal source of information about the re- 
mote processing features of CP-V. All information about remote processing for all computer personnel (on-line 
and batch users, system managers, remote site operators, and central site operators) is included in the manual. 

o The CP-V Transaction Processing Reference Manual, 90 31 12, provides information about dynamically modify- 
ing and querying a central database in a transaction processing environment. The manual is addressed to system 
managers, database administrators, applications programmers, and computer operators. 

• The CP-V System Programming Reference Manual, 90 31 13, describes the CP-V features that are designed to 
aid the system programmer in the development, maintenance, and modification of the CP-V system. 

• The CP-V System Management Reference Manual, 90 16 74, is the principal source of reference information 
for the system management features of CP-V. It defines the rules for generating a CP-V system (SYSGEN), 
authorizing users, maintaining user accounting records, maintaining the file system, monitoring system per- 
formance, and other related functions. 

• The CP-V Operations Reference Manual, 90 16 75, is the principal source of reference information for CP-V 
computer operators. It defines the rules for operator communication (i.e., key-ins and messages), sys- 
tem start-up and initialization, job and system control, peripheral device handling, recovery and file 
preservation. 

• The CP-V Common Index (90 30 80) is an index to all of the above CP-V manuals. 

Information for the language and application processors that operate under CP-V is also described in separate man- 
uals. These manuals are listed on the Related Publications page of this manual. 
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COMMAND SYNTAX NOTATION 



Notation conventions used in command specifications and examples throughout this manual are listed below. 



Notation 


Description 


lowercase letters 


Lowercase letters identify an element that must be replaced with a user- 
selected value. 




CRndd could be entered as CRA03. 


CAPITAL LETTERS 


Capital letters must be entered as shown for input, and will be printed as shown 
in output. 




DPndd means "enter DP followed by the values for ndd". 


[] 


An element inside brackets is optional. Several elements placed one under the 
other inside a pair of brackets means that the user may select any one or none 
of those elements. 




[KEYM] means the term "KEYM" may be entered. 


I J 


Elements placed one under the other inside a pair of braces identify a required 
choice. 




A 1 

. , means that either the letter A or the value of id must be entered. 

idj 


... 


The horizontal ellipsis indicates that a previous bracketed element may be 
repeated, or that elements have been omitted. 




name[,name]. . . means that one or more name values may be entered, 
with a comma inserted between each name value. 


; 


The vertical ellipsis indicates that commands or instructions have been 
omitted. 




MASK2 DATA,2X'^EF■ 
! means that there are one or more statements 

BYTE DATA, 3 BA(L(59)) °"^'''^^ ^^'^^^" '^^ '^° ^^'^^ directives. 


Numbers and 
special characters 


Numbers that appear on the line (i.e., not subscripts), special symbols, and 
punctuation marks other than dotted lines, brackets, braces, and underlines 
appear as shown in output messages and must be entered as shown when input. 




(value) means that the proper value must be entered enclosed in 
parentheses; e.g., (234). 


Subscripts 


Subscripts indicate a first, second, etc., representation of a parameter that 
has a different value for each occurrence. 




sysidi,sysid2/Sysid3 means that three successive values for sysid should 
be entered, separated by commas. 


Superscripts 


Supercripts indicate shift keys to be used in combination with terminal keys, 
c is control shift, and s is case shift. 




L*^^ means press the control and case shift (CONTROL and SHIFT) and 
the L key. 


Underscore 


All terminal output is underscored; terminal input is not. 




_!_RUN means that the exclamation point was sent to the terminal, but RUN 
was typed by the terminal user. 


©@© 


These symbols indicate that an ESC (©), carriage return (©), or line feed (©) 
character has been sent. 




lEDIT @ means that, after typing EDIT, a carriage return character has 
been sent. 



1. INTRODUCTION 



SONTROL PROGRAM-FIVE 

Control Program-Five (CP-V) is a general purpose system that operates on a Sigma 6, 7, 9 or Xerox 560 computer 
and a variety of peripheral devices. CP-V provides for five concurrent modes of operation: 

Time-sharing. 

Multiprogrammed batch processing. 

Remote processing. 

Real-time. 

Transaction processing 



SCOPE OF THIS MANUAL 

This manual is designed as a basic guide for using CP-V in the time-sharing mode only. It is not intended as a guide 
to "sophisticated" usage, nor as a complete reference to TEL and other processors. Please refer to CP-V/TS Refer- 
ence Manual, 90 09 07, and applicable language reference manuals for complete command formats and descriptions. 
However, Appendix A of this manual presents a summary of TEL commands in reference format. 

The command formats shov/n in the text are not necessarily complete, as for example in the case of PCL COPY. 
Only the more commonly used forms are given and explained. Also, knowledge of the programming languages avail- 
able under CP-V is required for Full understanding of this manual. 

The examples throughout this manual are written for Teletype® terminals (see Figure 1 for layout of a typical key- 
board). 2741 terminal users should read Appendix F, "Use of the 2741 Terminal", before reading further in the manual. 



TERMINAL EXECUTIVE LANGUAGE 

The Terminal Executive Language (TEL) is the on-line command language for CP-V, a concise natural language for 
performing on-line functions and calling on-line processors. It also provides information services, such as account- 
ing charges and status of available system resources. 

Some of the functions performed as the result of TEL commands are: 

Building a file. 

Initiating a processor. 

Loading and executing a program^. 

Quitting or continuing on interrupted processor. 

Copying a file. 

Deleting a file. 

Controlling output. 

Setting DCB assignments. 

Submitting batch jobs. 

Checking the status of batch jobs. 

Saving and restoring files. 

Queuing output for symbiont devices. 



® 

Registered trademark of the Teletype Corporation, 
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Introduction 1 



• Sefting tab stops for terminal I/O. 

• Controlling the terminal interface (e.g., page width and length). 

• Setting the log-on password. 

• Communicating with the operator. 

On-line processors available to the user through TEL include 



COBOL 
FORT4 
META 
AP 

BASIC 

APL 

FLAG 

Edit 

PCL 

Delta 

FDP 

COBOL On-Line 
Debugger 

Link 

LYNX 

Batch 

Show 



ANS COBOL. 

Extended version of FORTRAN IV. 

Assembler with powerful procedure (macro) capability: Meta-Symbol. 

Assembler which permits programs to be written in segments and to contain command and 
function procedures. 

Processor for creating, executing, and maintaining programs written in a simple mathe- 
matical language. 

Processor for interactive problem solving with a minimum of programming effort. 

Fast "load and go" FORTRAN compiler. 

Line/text editor. 

Language for copying and deleting files, listing directories, and manipulating tapes. 

Debugging processor used primarily for assembly-language programs. 

Debugging package for FORTRAN programs. 

Debugging package for COBOL programs. 

Processor that constructs an executable program (load module) from object-program 
modules. 

Processor that combines the capabilities of Link and the batch load processor. 

Processor that submits a batch job file to the batch job stream. 

Processor that displays the user's system parameters. 



Processors are usually calledexplicitly by name but may also be called implicitly by certain TEL commands. For 
example: 



BUILD 
COPY 
RUN 



Calls Edit to build a file. 

Calls PCL to copy files. 

Calls Link to link a program and causes the program to be loaded and executed. 



When a processor is called in this manner, control returns to TEL (rather than to the called processor) immediately 
after execution of the command. 



Terminal E^^cuHve Language 
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LLI These keys are missing on some models, 

I 2 I This key is positioned elsewhere on some models. 



H This is interpreted as | (OR) on Model 7015. 
HThis is interpreted as — i (NOT) on Model 7015. 



Figure 1. Teletype Keyboard 



2. LOGGING ON AND OFF 



DIALING THE COMPUTER 

To establish connecHon with the computer, proceed as follows: 

1. Turn on power switch for terminal and for acoustical coupler (or "modem"), as necessary. 

2. Pick up telephone handset, wait for dial tone, and dial computer. A high-pitched tone will be heard 
if a communication line is available. 

3. Place handset on acoustic coupler (see Figure 2). 

TEL (Terminal Executive Language) now responds with the following message: 

XEROX CP-V AT YOUR SERVICE 

ON AT (time and date) 

LOGON PLEASE: 
You can now log onto the system (provided you have been enrolled on the system by the system manager). 

LOGGING ON AND OFF 

To logon, you must have an account number, a name, and possibly a password. The account is your billing 
number and the name is your personal or group identification. Both are assigned by the system manager. 
Password is an account-protection feature that is assigned either by the system manager or by yourself (see 
PASSWORD Command, below). It can be modified periodically for security purposes. 

Upon receipt of the message LOGON PLEASE:, enter youraccount, name, and password, in that order, separated 
by commas. The password and preceding comma are omitted if no password has been assigned. 




Figure 2. Typical Dialing Unit 



Logging On and Off 



Account number and password may each be from one to eight characters in length. The name may consist of one to 
12 characters. None of the following characters may be used in the user name, account, or password: 

and all control characters acted upon by the COC. 

The graphic representation of certain special characters, such as the left arrow, is terminal -device dependent, as is 
the availability of the lowercase alphabetics. The character set shown above should be regarded as representative 
only in this respect. 

For terminals operated in indirect printing mode, character echoing by the system is normally on but can be turned off 
(e.g. , to suppress printing of passwords or other security-related information) by striking the @ E keys. Striking 
the0E keys a second time turns echoing back on. For terminal units operated in direct printing mode, character 
echoing by the system must be turned off, as above, to suppress duplicate printing of characters. 

It may not always be possible to log on. If an error prevents the reading of the logon file, the message UNRECOV- 
ERABLE I/O ON RAD, or ABNORMAL ERROR ON LOGON FILE will be typed. Whenever you are unable to log 
on, start over by striking the BREAK key and try again. The system tries five times to log you on before dis- 
missing you. 

If a MAILBOX file (a message file) exists at log-on time, the message CHECK DC/MAILBOX will appear. You may 
examine this MAILBOX file by copying it to your terminal as follows: 

J_COPY MAILBOX® 

(The underscored exclamation mark is the "prompt character" issued by TEL. ) 



Example 1. Logging On and Off. 



XEROX CP-V AT YOUR SERVICE 


The user dials the computer. 


ON AT 12:30 MAR 12, '75 


The system identifies itself, states the time and date. 




and requests that the user log on. 


LOGON PLEASE: 2232, HALL @ 


In response, the user types in his account number (2232) 




and name (HALL). He does not use a password be- 




cause the system manager has not assigned him one. 


12:30 03/12/75 2232 15-9 [ll 


A page heading is printed by the system; the items of 




information in the heading are, in order: time, date. 




account number, two internal identifiers, and 




page number (enclosed in square brackets). 


J_OFF ® 


The Terminal Executive types its prompt character (!) 




indicating that the system is ready to process a TEL 




command. Since this was just an experiment for the 




user, he logs off. 


CPU = .0124 CON = :01 INT = 2 CHG = 10 


Summary of accounting information for session. 



In Examplel, the user used .0124 minutes of central processor time (CPU =.0124); he was connected to the terminal 
(from dialing up to end of accounting summary) .01 hour (CON = :01); he interacted with the system twice 
(INT = 2), logging on and the OFF command. His charge was 10 charge units, an installation-dependent value. 
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Logging On and Off 



Example 2. Logging On with a Wrong Account Number 




XEROX CP-V AT YOUR SERVICE 


The user dials the computer. 


ON AT 02:30 MAR 12. '75 




LOGON PLEASE: 223L,HALL @ 


He types in the right name but the wrong account number. 


ACCOUNT/ ID 223L/HALL ? 


The system questions the incorrect account number, and 




asks the user to log on again, which he does. 


LOGON PLEASE: 2232, HALL P) 




-page heading- 




_!_OFF ® 


He then logs off. 


-accounting summary- 





Example 3. Inability to Log On Due to Error in Logon File 



XEROX CP-V AT YOUR SERVICE 
ON AT 12:42 MAR 17. '75 
LOGON PLEASE; C37-105,HALL@ 

The user tries to log on. 

ABNORMAL ERROR ON LOGON FILE 
SORRY. UNABLE TO LOG YOU ON 

The system cannot log him on and so informs him. 

CPU = .0024 CON = ;01 INT = 1 CHG = 10 
The accounting summary is presented. 

XEROX CP-V AT YOUR SERVICE 

The system repeats its logon sequence. 

ON AT 12:43 MAR 17. '75 
LOGON PLEASE; C37-105,HALL @ 

This time the user's logon is accepted, 
-page heading - 

J_OFF© 

He now logs off. 
CPU » .0024 CON = ;01 INT - 2 CHG - 15 



PASSWORD COMMAND 

The purpose of the logon password is to protect your resources and files by preventing illicit use of your name and 
account number. The PASSWORD command allows you to change your password frequently to make it difficult for 



PASSWORD Command 



anyone else to know whaf It Is. You can also use the command to cancel your password if you wish. The format of 
the command is 

PASSWORD, old -password, new-password 

where old-password is the current password associated with the user and new-password is the password to be asso- 
ciated with the user's name and account. To assign a fxissword when none exists already, the format of the com- 
mand is 

PASSWORD, , new -password 

To cancel the current password, the command format is 

PASSWORD, old-password, 

It is important to remember your password because only the system manager is able to establish o new password when 
the old one is forgotten. 

Example 4. Setting a Password 



XEROX CP-V AT YOUR SERVICE 
ON AT 12:49 MAR 17, '75 
LOGON PLEASE: 2232, HALL® 

The user logs on, with no password set. 

j_PAS SWORD, .SECRET S 
PASSWORD CHANGE SUCCESSFUL 

The Terminal Executive types its prompt character (!) indicating it is ready to process a TEL command. 
The user sets his password to SECRET and must now use it whenever logging on until he or the system 
manager changes it. 

-page heading- 

_!_OFF @ 

The Terminal Executive types its prompt character and the user logs off. Password SECRET remains set. 
-accounting summary- 



Example 5. Logging On with Password and then Cancelling Password 



XEROX CP-V AT YOUR SERVICE 
ON AT 14;45 MAR 17. '75 
LOGON PLEASE ; 2232, HALL® 

The user logs on but forgets to use his new password. 

PASSWORD ? 

The system indicates that the password was not entered. 

LOGON PLEASE ; 2232, HALL, SECERT.® 

The user logs on with an incorrect password. 

PASSWORD SECRET? 

The system indicates that the password is invalid. 
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PASSWORD Command 



LOGON PLEASE; 2 23 2, HALL, SECRET @ 

The user now logs on wifh fhe correct password. 

-page heading- 
_!_PASSWORD, SECRET, 

He cancels his password by typing fhe PASSWORD with fhe old password and fhe required commas. 

PASSWORD CHANGE SUCCESSFUL 
J_OFF © 

He then logs off. Next time he logs on, no password will be required, 
-accounting summary- 



Example 6. Setting a Password and Suppressing Its Printing 



XEROX CP-V AT YOUR SERVICE 
ON AT 09;05 MAR 20, '75 
LOGON PLEASE; 2232, HALL © 

The user logs on. 

-page heading- 

j_PASSWORD @ E @ E © 

The Terminal Executive types its prompt character (!) indicating it is ready to process a TEL command. 
The user sets his password with the remainder of the PASSWORD command but suppresses its printing by 
typing© E before the old-password (the first E is not actually echoed), then turns echoing on again. 
He must now use the password he has just set whenever logging on, until he or the system manager 
changes it. Any sequence of 1-8 permissible characters may be used as a password. 

PASSWORD CHANGE SUCCESSFUL 



OFF @ 



The Terminal Executive types its prompt character indicating it is again ready for a TEL command. 
The user logs off. The next time he logs on, he must use the password just set. 

-accounting summary- 
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3. TERMINAL INTERFACE 



IKTRODUCTION 

This chapter describes methods for correcting, modifying, and deleting terminal input and the use of the TERMINAL, 
PLATEN, and TABS commands. 

EDITING OF TERMIHAL INPUT 

A line of terminal input may be corrected, modified, or deleted, before the line is released to the system (with©). 
This may be done by way of either character or line deletion: 

1. Editing by Character Deletion: On detecting a typing error within a few characters of the point of error, 
you may delete the last characters typed by typing a corresponding number of rubout@ characters (echoed 
with a \ character), and continuing the line from the (deleted) point of error. (Any n successive ©char- 
acters effectively delete the n successive characters immediately preceding the first© character.) 

2. Editing by Line Deletion: To delete a complete line of input —before giving a carriage return, strike the 
ESCAPE and X keys or simultaneously depress the CONTROL and X keys (@X or X^ in conventional notation). 
The system responds with a *-(left arrow), effectively deletes the line, gives a carriage-return/^ine-feed, 
and positions the carriage to the beginning of input. (The previous prompt character, if any, is not repeated.) 
The input can then be^ repeated in correct form. The X^ command will delete not only the current input 
line, but all lines typed ahead and all pending output. 

These editing features applyto any untransmitted line of terminal input, under TEL or any other processor except Delta. 

Example 7. Making Corrections to TEL Commands 



XEROX CP-V AT YOUR SERVICE 
ON AT 15:30 MAR 22. '71 
LOGON PLEASE: 2232,HALK\L© 



While logging on, the user hits a K instead of an L. To delete K, he strikes the rubout key which echoes 
back to the terminal as a backslash. Then he types L and completes the logon sequence. (Note that the 
characters printed at the terminal are those echoed back to the terminal and are not necessarily the same 
ones typed, as for example \ for @).) 

- page heading - 



c 



_!_QAS SWORD Y07 X ;^ 

The user then types in a password command but notices an error (password misspelled) before striking the 
carriage return key. Instead he depresses CONTROL and X simultaneously, which the system echoes 
back as a left arrow (or possibly an underline). This causes the line to be cancelled and a carriage 
return. 

PASTWo\\\sWORD Y07 @ 

PASSWORD CHANGE SUCCESSFUL 

The user notices still another error. This time he deletes three characters and then completes the 
command successfully. Note that prompt character (!) is not repeated. 

j_OFF @ 

He then logs off. 
- accounting summary - 



Terminal Interface 



TERMINAL COMMAND 

The TERMINAL command is used to inform the system of the type of terminal used, and is required only if the 
terminal differs from a type of terminal unit specified as standard by the system. (This information can be obtained 
from the installation manager. ) 

Format: 

TERMINAL type[,algorithm] 
where 

type specifies the terminal type and may be any type from the list below: 



Type 


Translation 


33 


Teletype Model 33 


35 


Teletype Model 35 


37 


Teletype Model 37 


7015 


Xerox 7015 Keyboard Printer 


DATA [point] 


Teletype Model 33 


EAPL 


IBM 2741 EBCD API 


ESTD 


IBM 2741 EBCD Standard 


EXEC [U PORT] 


Teletype Model 33 


MEMO[REX] 


Teletype Mods! 37 


SAPL 


IBM 2741 Selectric API 


SSTD 


IBM 2741 Selectric Standard 


Tl 


Teletype Model 37 (TI is Texas Instrument's Model 725) 



algorithm specifies the timing algorithm number for the terminal. The value may be in the range 0-7. Its 
meaning is discussed in detail in the CP-V/TS Reference Manual, 90 09 07. 



Example 8. Use of TERMINAL Command 



XEROX CP-V AT YOUR SERVICE 














ON AT 11:45 MAR 23. '71 














LOGON PLEASE: 2232,HALL,Y07 














- page heading - 














ITERMINAL 37 © 














Indicates a Model 37 Teletype. 


The 


system will use this 


information to modify 


response to 


nput/ 


output for different types of termi 


nals/ 


as necessary. 


For the rest of the session. 


the Monitor 


recog- 


nizes the terminal as a Model 37 Teletype. 










j_0FF@ 














- accounting summary - 
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PLATEN COMMAND 

The PLATEN command can be used to change the page width and/or page length for terminal Input and output. The 
format of the command is: 

PLATEN [w][,l] 

where 

w is the maximum number of characters to be written per line on the terminal. If more than w characters 

are written, a line feed and carriage return character sequence is Inserted to break up the output into seg- 
ments no longer than specified by w. If w is 1 1 or less, no line feed and carriage return sequence is sup- 
plied. In this case, the width of the line is limited only by the physical constraints of the device on which 
the line Is produced (up to a maximum of 140 characters). If the w field is omitted, the current width set- 
ting is retained. 

I Is the number of lines per page of terminal output (exclusive of the header) and must be within the 

range 0-255. If the I field is omitted, then the number of lines per page remains unchanged. If I is set 
to 1 1 or less, no heading is produced and the page length is unlimited. Note that a heading occupies 
11 lines. 
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The default case when a user logs on is equivalent to PLATEN 0,0. This means that no line feed and carriage 
retyrn sequence is supplied, thot no heading is produced, and that the page length is unlimited. 



Example 9 shov/s how PLATEN can be used to change page width. The example contains four job steps, i.e. , major 
functions during a session that cause the invoking of processors such as EDIT, PCL, or META. 

Example 9. Using PLATEN Command to Change Page Width 



XEROX CP-V AT YOUR SERVICE 
ON AT 17:24 APR 15. '71 
LOGON PLEASE; 14777, HALL @ 



17:24 04/15/71 14777 



23-7 [1] 



XBUILD TESTl @ 

1.000 123456789012345(3789012345678901234567890 @ 
2.000 C^ 

The user enters the BUILD command to build file TEST!. File building is described in detail in Chapter 4. 
(This is the first job step of the session.) The ©alone on line 2.000 terminates the build operation and 
control returns to TEL. 

^PLATEN 20 @ 

The page width is set to 20. 

_[_COPY TESTl TO ME @ 
12345678901234567890 
12345678901234567890 

File TESTl is printed at the terminal. The page width is now 20. (The COPY command, which implicitly 
invokes the PCL processor, is the second job step.) 

J_PLATEN 39 @ 

The page width is set to 39. 

_!_C0PY TESTl @ 

123456789012345678901234567890123456789 



File TESTl is printed again but with 39 characters per line. (This COPY constitutes a third job step. Note 
that the output specification TO ME is omitted. PCL assumes ME as a destination device by default.) 

J_PLATEN 12 © 

The page width is set to 12. 

_!_C0PY TESTl @ 

123456789012 

345678901234 

567890123456 

7890 

File TESTl is printed again but now has 12 characters per line. (This is the fourth and last job step.) 

\0¥F @ 

The user logs off. Note that the last PLATEN command is still in effect. (However, the page width and 
length is always set to the default case, equivalent to PLATEN 0,0, when a user logs on.) 



CPU = 


.0097 


C0N= 


:03 INT 


= 13 


CHG = 



42 
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Example 10 shows how PLATEN is used to change page length. (This example also contains four job steps.) Note 
that the page-length specification refers to the number of single-spaced lines in the body of the page, i.e., exclud- 
ing top-of-page heading and spacing. Each line of double-spaced output, where double spacing occurs, counts as 
two lines. Therefore, if n double-spaced print lines are desired, the page-length must be specified as nx2. Oc- 
casionally, only n-1 lines, or less, will be printed due to various circumstances, e.g., an intervening single- 
spaced command line. 



Example 10. Using PLATEN Command to Change Page Length 



XEROX CP-V AT YOUR SERVICE 
ON AT 17:29 APR 15, '71 
LOGON PLEASE; 14777, HALL @ 

17:30 04/15/71 14777 21-9C1] 

_!_BUILD TEST2© 

1.000 1 @ 

2.000 2 @ 

3.000 3 @ 

4.000 4 © 

5.000 5 @ 

6.000 6 @ 

7.000 7 @ 

8.000 8 @ 

9.000 9 © 
10.000 10 © 
11.000 11 © 
12.000 12 © 
13.000 13 © 
14.000 14 © 
15.000 15 © 
16.000 © 

The user builds file TEST2. (The ©alone on line 16.000 terminates the build operation and control 
returns to TEL. ) 

IPLATEN 72,12© 

The PLATEN command sets page width to 72 haracters and the length to 12 lines. 

17:30 04/15/71 14777 HALL 21-9E2] 

The system prints the second page heading, on overflow of newly set page length. 

_!_C0PY TEST2 TO ME © 

1 

2 

3 

4 

5 

6 

7 



10 
11 



A copy of file TEST2 is printed at the terminal 

17:31 04/15/71 14777 21-9[3] 

The third page heading prints. 
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13 














]A 














15. 














J_OFF @ 














The 12- 


-line 


page is st" 


II in 


effect 




CPU= 


=.0129 


CON= 


:05 INT = 


19 


CHG = 


55 



TABS COMMAND 

The TABS command is used to simulate typewriter-like tab stops for terminal input and output. TABS supplies the 
tab-setting values that are to be used by the system when it encounters a 'tab character' in the input or output line. 

You can then tabulate by typing I (CONTROL and I), or ©I (ESCAPE followed by I), in your input wherever you 
desire a tab in both the input and corresponding output. However, in order to cause tab characters to be inserted 
whenever the I^ or @I sequence is typed, the space-insertion mode must be turned off by typing ©S (ESCAPE fol- 
lowed by S). 

The tab settings can be changed by another TABS command. Tab simulation can also be turned off, and then back 
on, with the key sequence ©T. 



Example 11. Using the TABS Command 



XEROX CP-V AT YOUR SERVICE 
ON AT 17;35 APR 15. '71 
LOGON PLEASE; 14777, HALL© 

- page heading - 

ITABS 8,22,37,45,52© 

The user sets tab-stop values for terminal input and output. 

1© S \_© 

Space insertion mode is turned off. 

! BUILD TEST3@ 

1.000 THIS@ EXAMPLE© ILLUSTRATES© USE© OF© TABS© 
2.000 © 

File TEST3 is built using tabulation (© = I or ©I). 



ICOPY TEST3@ 

THIS EXAMPLE ILLUSTRATES USE OF TABS 

This file is printed with tab simulation on. 



i©T\_© 

The user now turns off tab simulation with the sequence ©T. 
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J_COPY TEST3 (g) 

THIS EXAMPLE ILLUSTRATES 


USE 


OF 


TABS 


- 
























The file now prints with 


no 


tabb 


ing. 


Note that 


sing 


e 


spaces 


are 


inserted 


in 


P 


ace 


of tab 


charac 


ters. 


lOFF @ 
































- accounting summary - 
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4. MANIPULATING FILES 



FILES IN CP-V 

Almost from Hie moment- you become a user, you start accumulating data — the information upon which the system 
must operate to provide the answers to the problems you pose. All of the processors mentioned in Chapter 1 produce 
some kind of data; for example: 

• Edit allows you to create the collection of statements necessary to phrase a problem-solving procedure in 
the language of an assembler or compiler, called a source program, and to create input data for 
such programs. 

• BASIC, FORTRAN, and META allow you to translate a source program, which is only a model of the 
external idea, into a form suitable for execution by the machine. This translation produces object code 
as the result of either ci "compilation" or "assembly" process. 

• LINK prepares the relocatable object code for machine execution, in the form of a load module. 

These different kinds of data have at least one characteristic in common: each must be stored in some retrievable 
form, both between the steps of an information-processing operation, and between executions of the same operation. 

Conventional batch systems provide the user with several ways of storing data, principally on punched cards or 
magnetic tape. Although these media provide low cost, long-term storage, they require operator Intervention at 
the central computer site when the stored information is to be accessed or updated. This intervention may be 
merely inconvenient for batch operation when the Information is used frequently, but It is generally infeaslble for 
on-line use of a time-sharing system. 

The system's file management capabilities provide an alternative and remarkably versatile medium for maintaining 
your working data — a medium which greatly lessens your dependence on conventional external forms of storage, and 
Increases the flexibility with which the data can be manipulated. File storage is Implemented through use of the 
Xerox Rapid Access Data Storage System (RAD) and/or through use of public disk packs. Generally speaking, a RAD 
is a nonremovable rotating-disk memory device containing approximately 6 million characters (or bytes) of storage, 
any portion of which can be accessed within a very short time. Public disk packs provide approximately 24 million 
characters of storage. (The system allows you, the on-line user, to access conventional peripheral-storage devices 
and private disk packs also, if you are so authorized.) 

The Monitor, through Its file -management system, allows information to be stored on RAD and/or disk packs and Identi- 
fied symbolically, simply by a file name chosen by the user. The files are segregated by account number (your iden- 
tifying number assigned by the installation manager). Therefore, you cannot inadvertently generate file names that 
conflict with those of other users outside your account. Certain other Information about the file, such as restrictions 
on access by other users, is also kept with the file. 

Files can be used to store any kind of information. They can contain source-language programs built with Edit or 
BASIC, translated source progroms produced by a compiler (relocatable object code), or object code In executable 
form (a load module) produced by the link-loader. They can also contain collections of alphanumeric data, and 
natural-language text. 

A file is identified by a name of 1-10 characters constructed from a prescribed set of characters. (Some processors, 
such as Edit, allow up to 31-character file names for special purposes.) The permissible character set contains all 
of the alphabetic and numeric characters plus most of the commonly used special symbols. Typically, you will need 
no more than the alphabetic and numeric characters. In the command-language formats given throughout this man- 
ual, the symbol most commonly used to Indicate a "file name" is fid, which stands for file-identification. A file- 
identification actually can Include an explicit account number and password, as well as the file name. But In our 
examples, and in most actual usage, fid is Interpreted simply as a file name. Complete rules for the structure of 
file-identifications are given in Appendix B. 

Having created a file of Information, you are completely free to access or delete It, replace it, or modify It, through 
on-line services, without any operator Intervention. A general rule is that you may not delete or modify files not 
in your account, though often you may access such files. 
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Somefimes files are created automafically for you by the sysfem. If Is possible to call a processor such as FORTRAN 
to translate a source program without specifying a file in which to store the object code. In this case, the system 
creates a unique temporary file, associated with your account, for output storage. You may refer to this file with 
the single character $ under certain subsystems. The $ file is temporary in the sense that when you log off, the file 
is automatically released. This is useful when creating test programs where nothing of permanent value is being 
created as output. 

Any file that is explicitly named for output is permanent, i.e., retained in the file-management system across the 
periods between on-line sessions. All files explicitly created with BUILD and COPY commands are also permanent. 
Permanent-file content is maintained and updated solely by the user. However, file storage space Is a chargeable 
resource, and it is in your interest to delete unneeded files whenever possible. 

When working with files, there are two command modifiers of importance: ON and OVER. ON Implies that the 
named file does not yet exist. If such a file does indeed exist and ON is used, an error message is sent to the user. 
(In general, the word TO may be substituted for ON, with the same effect.) 

OVER implies that the file may exist already and, if so, is to be reused for the new operation. Using OVER also 
results in a completely new version of the file; any old data in the file is lost. If the file does not exist and OVER 
is specified, no error is noted, and the file is automatically created. There is no limit to the number of operations 
that may be performed OVER a file. 

Information about the immediate intended use of a file is called a file specification. These specifications are made 
implicitly by the use of several commands, particularly COMMENT, LIST, and OUTPUT. An explicit specification 
can be made by the use of the SET command. (See Chapter 10, "DCB Assignments".) For our present purposes, file 
specifications may be considered to indicate that a file is an input or an output file, and if an output file, what 
type(s) of output the particular file Is to receive. 

Once a file specification has been made, it remains in effect throughout a terminal session until changed or deleted 
by another specification — the one exception concerns source-input files (operational label SI), which always default 
to the user's terminal at each job step. If, for example, listing output is directed to the file "DATA", then all listing 
output generated by a series of assemblies or compilations are placed on this file, one behind the other. This con- 
vention is known as "file extension" and is automatically in effect for output operations on standard system-assigned 
files — or more precisely, through certain system-created Data Control Blocks (DCBs). (DCBs are described in the 
CP-V/BP Reference Manual, 90 17 64, and discussed further in the TEL chapter of the CP-V/TS Reference Manual, 
90 09 07.) References to DCBs are gradually introduced further along in this manual, and they are treated specifi- 
cally in Chapter 10, "DCB Assignments". 

File extension is an important feature to keep in mi d when operating at the terminal, especially when It is not 
desirable to stack any output during multiple-job-step operations. File extension is reset to the beginning of the file 
upon any new specification, even if the specification refers to an already existent file. For example: 

_!_LIST ON CRUNCH Listing output directed to file CRUNCH. 

j^OUTPUT ON RUNFILE Object-code output directed to file RUNFILE. 

IMETA SOURCE Read input-file and assemble (job step 1). 

IMETA ME Assemble from terminal (job step 2). 

IMETA TESTY Read Input-file and assemble (job step 3). 

This sequence of commands results in all output being stacked on their respective files, CRUNCH or RUNFILE. 

The new listing-output specification and further job step 

_[LIST OVER CRUNCH 

|META (job step 4) 

has the effect of replacing the old contents of CRUNCH with the new assembly listing as the source input is entered 
from the user's terminal. The object-code output would still be stacked at the end of file RUNFILE. This basic use 
of file extension logic applies independent of the manner in which file specifications are made. I.e., through the SET 
command or through commands implying a specification. 
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To understand certain error comments you may encounter, you will need some knowledge of file organization. This 
refers to the way the file's contents, i.e., its individual records, are ordered. Three possible organizations are 

• Consecutive , where the records can be accessed in sequential order only. 

• Keyed , where the records may be accessed directly (randomly) or sequentially, 

• Random , where the file is simply a collection of contiguous storage. 

Files built with the Edit processor, having a line number associated with each record (line), are an example of a 
kind of keyed file. Most files you will use will probably be keyed, but you may see a system comment stating 
"...file not keyed...". Certain processors are not keyed-file oriented, e.g., BASIC and PCL, though they handle 
keyed files properly in most cases. Later we indicate what you can do in other cases. 

EDIT 

The Edit processor is a general-purpose, line-number oriented text editor. It may be used to create or modify source 
programs, data files, reports, etc. for other CP-V processors, specifically for the FORTRAN, Meta-Symbol, BASIC, 
COBOL, and BATCH processors. 

Edit provides file editing capability, i.e., the ability to build, delete, copy, or merge files; to edit within a line 
of a file; and to do a complex editing operation on each line in a specified range of lines. 

The examples in this section illustrate how Edit is used to perform file editing, and to access a file and perform 
record (line) editing functions such as displaying (TY), inserting (IN), and deleting (DE). 

One example of intrarecord, or multiline editing is also given, as a basis for general use of the intrarecord-command 
group. Edit commands not covered here are described in the CP-V/TS Reference Manual, 90 09 07. 

In the command descriptions that follow, the word "line" refers to a line typed by the user; the word "record" refers 
to a line that has already been transmitted to the system and exists on some file. Thus, we can say ". . .the line 
numbered n replaces any identically numbered record. . . " (i.e., already on the file) without ambiguity. The ex- 
amples are intended to illustrate usage of the various commands and do not necessarily show the most appropriate way 
of dealing with a particular kind of file content. More appropriate means may become apparent in later chapters, 
especially in regard to manipulation of BASIC program text. 

HOW EDIT WORKS 

Edit is a line-number oriented editor in that it automatically associates a line-sequence number with each line of a 
file built under Eidit. All record and intrarecord editing is performed with reference to these sequence numbers. 
That is, one or more sequence numbers must be specified for record and intrarecord editing commands and also in 
certain usages of the file editing commands. 

To edit a file that does not have sequence numbers associated with it (e.g., a file built under BASIC or under certain 
batch-mode facilities), you can add the numbers by copying the file with "resequencing" (see Example Copy and 
Resequence). 

Edit prompts with an asterisk (*) character to indicate that it is ready to accept a command. For file-building or 
line-insertion input, it prompts with a sequence number. 

FILE EDITING COMMANDS 

All file editing commands explicitly name one or more files. The Edit and TEL/Edit commands at the file-editing 
level are: 

• |EDIT [fid] 

Calls the Edit processor and optionally names a file to be edited, at TEL level (!). 

• *EDIT fid 

Names a file to be edited, at Edit processor level (*). 
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• _[BUILD fld[,n] 

Calls Edit and names a file to be built at the TEL level (!). 

• *BUILD fid[,n] 

Names a file to be built at the Edit processor level (*). The optional number (n) specifies the sequence 
number with which the file is to begin. If not specified, 1 is assumed by Edit. 

• 5oPYfid,|^^'^^} fid^M 

Copies contents of fidi either ON a new file or OVER on existing file, fid2; and, optionally, resequences 
(i.e., renumbers) fid2 starting with sequence-number n. COPY can also be used to produce a sequence- 
numbered (keyed) version of an unkeyed file, in which case n must be specified. 

• *DELETE fid 

Deletes the named file from the system. 

• *MERGE fid^[,n^-n2] INTO fid^, n^-n^ 

Replaces records no through n^ of fid2 with the contents of (or record n] through n2 of) fid^; the merged 
records — from fidi —are renumbered in fid2 starting with sequence-number n3. Note; If fid2 does not 
already exist, the specified records on fid] are copied to the new file and numbered starting with no (i.e., 
a "selective copy" operation is performed). 

• *END 

Terminates execution of Edit and returns control to the system (TEL) level. 

RECORD EDITING COMMANDS 

To use any of the record or intrarecord editing commands, the applicable file mus' first be specified with an EDIT- 
fid command either at the TEL or the Edit level. None of the record and Intrarecord-level commands themselves can 
specify a file. 

A useful record-editing command is TY — Type Rec d(s). Including Sequence Number — which displays one, several, 
or all of the records in a file: 

TYni[-n2] 
where 

ni is the sequence number of the first or only line to be typed. 

n2 is the optional ending sequence number of a range of lines to be typed. 

More record-editing commands are described following the next example- 



Wherever TO is specified, ON may be substituted. 
Example 12. Using EDIT to Build and Display a Source File 



. ^ . ^ 1 

In this example, the user builds a BASIC program file, copies it to another file, displays the copy, and 
deletes the original file. 

XEROX CP-V AT YOUR SERVICE 
ON AT 15 -.12 MAR 28/71 
LOGON PLEASE; 2232, HALL @ 
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- page heading - 
IBUILD PRIME © 

The user wants to create a file called PRIME. Edit is called implicitly. 

1.000 10 REM GElffiRATE PRIMES GR THAN 3 © 

Edit prompts for input by printing 1 . OOP . The user types the first line, then types lines 2-10 in response 
to more prompts by Edit. 

2.000 20 P=l © 

3.000 30 P=P+4,S=0© 

4.000 40 FOR I = 5 TO SQR(P) + 1 STEP 2© 

5.000 50 Q=INT(P/I) © 

6.000 60 IF Q*I=P THEN 80 © 

7.000 70 PRINT P"TAB(0)©: 

8.000 80 IF S=l THEN 30 © ' 

9.000 90 S=l, P=P+2 © 

10.000 100 GOTO 40 © 

11.000 © 

The user types a carriage return immediately following the prompt for line 11.000 to indicate end-of- 
file, that is, that the last line of the file has been entered. (Control returns directly to TEL, rather 
than to Edit, because BUILD was given at the TEL level.) 

|_EDIT © 

TEL prompts for another command. The user calls Edit again, explicitly this time, to use a command 
not available at TEL level. 

EDIT HERE 

*COPY PRIME, ON PRIMES © 

Edit acknowledges its presence, and prompts. The user decides to change the name of his program file 
from PRIME to PRIMES, so he copies it to a new file named PRIMES. 

. .COPYING 



..COPY DONE 



*EDIT PRIMES © 

He then indicates that he wants to edit (actually only display) file PRIMES. 

*TY 1-10 © 

He indicates that he wants the whole file, lines 1 through 10, typed. (A larger ending number, 
e.g., TY 1-99, would do the same job.) 

1.000 10 REM GENERATE PRIMES GR THAN 3 

2.000 20 P=l 

3.000 30 P=P+4,S=0 

4.000 40 FOR I = 5 TO SQR(P) + 1 STEP 2 



5.000 


50 


Q=INT(P/I) 


6.000 


60 


IF Q*I=P mEN 80 


7.000 


70 


PRINT P"TAB(0) 


8.000 


80 


IF S=l THEN 30 


9.000 


90 


S=l, P=P+2 


10.000 


100 


GOTO 40 



^DELETE PRIME © 



Edit displays the copy, and prompts. The user sees that the copy is OK and decides to delete the 
original file, PRIME, so as not to tie up disk space unnecessarily. 
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. .EDIT STOPPED 



The record editing mode is terminated for file PRIMES because file PRIME is to be processed. The 
above message is printed to indicate this. 

. .DELETED 
^END © 

He then indicates that he is finished with Edit. 

_!_OFF © 

and logs off. 

- accounting summary - 



MORE RECORD EDITING COMMANDS 

Two more commonly used record-level commands are IN (Insert Records) and DE (Delete Records). The IN command 
is used to insert one or more lines between two records of a file or, alternatively, to replace one record of the file 
with the first (or only) insert line. (The IN command can be used to replace only one record, though more records 
may be inserted immediately following the replacement. ) The IN command format is 

INn[,i] 



n is the sequence number of the first or only line to be Inserted. 

i is the optional increment value that Edit is to add to succeeding insertion-line sequence numbers. 

Detailed rules for the use of IN are given following the next example. 

The DE command deletes one or more (successive) records from the file. It has the format 

DE n[-m] 
where 

n is the sequence number of the first or only record to be deleted. 

m is the optional end sequence number of a range of records to be deleted. 

Example 13. Using EDIT to Modify a Source File 



In this example, the user (after "desk -checking" his initial source program) sees that a logically required 
BASIC statement (NEXT) is missing, and inserts it. He then realizes that this original program will produce 
an endless listing of prime numbers, and prepares a different version, using MERGE to excerpt a portion of 
the original program for modification, and then to recombine this portion, after modification, with a copy 
of the original (thus, retaining the original version also). 

XEROX CP-V AT YOUR SERVICE 
ON AT 15:28 MAR 28/71 
LOGON PLEASE: 2232, HALL @ 

- page heading - 



J_PLATEN 72,10 @ 

The user suppresses further page headings by giving a page length of less than 12. (This practice is not 
recommended for normal production work, where the page headings delimit a uniform document size 
and provide useful identification: name, date, time, page number.) 
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Edit 



^EDIT PRIMES® 

He fhen indicates he wants to edit PRIMES. 

EDIT HERE 
*TY 6-99 @ 

He asks for display of lines 6 through end-of-program, i.e., line number 99 is in this case sufficiently 
large to include the whole file. (Note that'"6-99" is equivalent to"6.0-99.0" or "6.000-99.000", etc.) 



6 


000 


60 


IF Q'VI=P THEN 


80 


7 


000 


70 


PRINT P"TAE 


(0) 




8 


000 


80 


IF S=l THEN 


30 




9 


000 


90 


S=l, P=P+2 






10 


000 


IOC 


) GOTO 40 




--EOF HIT AFTER 10. 





This message means: "End-of-file was found following line 10". 
^IN 6 . 5 @ 

The user asks to insert a line numbered 6.5, to add the missing statement. 

6.500 65 NEXT I @ 

Edit prompts for the insertion-line with the line number. It then prompts for another command with 
an asterisk. 

*TY 6-7 @ 

The user requests a display of lines 6 through 7, to see if the insert really worked. 

6.000 60 IF Q>vi==P THEN 80 
6.500 65 NEXT I 
7.000 70 PRINT P' 'TAB(O) 
£MERGE PRIMES, 6.1-10 INTO NEWEND,7@ 

He then asks for a portion of PRIMES to be copied on a new, empty file, NEWEND, and for the lines 
to be renumbered, starting with 7. 



. .EDIT STOPPED 
. .MERGE STARTED 
--DONE AT 11. 
*EDIT NEWEND 
*TY 1-11 © 



He requests a display to see if 7-11 was "excerpted" all right. 



7.000 65 NEXT I 

8.00C 70 PRINT P"TAB(0) 

9.000 80 IF S=l THEN 30 

10.000 90 S=l. P=P+2 

11.000 100 GOTO 40 
*IN 7.5@ 



He requests an insert numbered 7.5, enters the insertion as shown below, and then requests an insert 
at the end of the file^ i.e., line 12. 
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7.500 66 IF P > 1000 GOTO 110@ 
^IN 12© 

12.000 110 END® 
13.000 &) 

Edit- prompts for another insertion, line 13; the user replies with an immediate©, signifying "done" 
*TY 6-12© 

He then requests display of lines 7-12 (no line lower than 7 should exist). 



7 


000 


65 


NEXT 


I 

> 1000 


GOTO 




7 


500 


66 


IF P 


110 


8 


.000 


70 


PRINT 


P"TABCO) 




9 


.000 


80 


IF S= 


1 THEN 


30 




10 


.000 


90 


S=l^ 


P=P+2 






11 


.000 


100 GOTC 


40 





12.000 110 END 
''COPY PRIMES TO LOPRIM @ 



He requests an extra copy of PRIMES on new file LOPRIM. 

. .EDIT STOPPED 

. .COPYING 

..COPY DONE 

EMERGE NEWEND, 7-12 INTO LOPRIM, 6 . 1-10© 

He then asks for a replacement of the original program lines 6.1-10, with the modified program end- 
ing from NEWEND. 



. .MERGE STARTED 
--DONE AT 12.1 
*EDIT LOPRIM© 
*TY 5-13© 



He requests display of lines 5 through end-of-file on LOPRIM. 



5.000 50 Q=INT(P/I) 

6.000 60 IF Q*I=P THEN 80 

6.100 65 NEXT I 

7.100 66 IF P > 1000 GOTO 110 

8.100 70 PRINT P"TAB(0) 

9.100 80 IF S=l THEN 30 

10.100 90 S=l. P=P+2 

11.100 100 GOTO 40 

12.100 110 END 
-EOF HIT AFTER 12.1 



^DELETE NEWEND© 

Since NEWEND Is now appended, he deletes the file for the sake of economy. 



. .EDIT STOPPED 
. .DELETED 
;^IN 1, .1 © 

He then decides to replace the original 'remarks' line (1.000), and specifies a small increment to 
allow room for further insertion lines before line 2. 
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1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 
1.100 R EM (THIS PROGRAM IS A LIMITED VERSION OF 
1.200 REM MY PROGRAM "PRIMES", WHICH HAS NO 
1.300 R EM UPPER LIMIT BUILT IN.) 
1.400 
*TY 1-15 <8 

He requests display of result. 



1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 
1.100 REM (THIS PROGRAM IS A LIMITED VERSION OF 
1.200 REM MY PROGRAM "PRIMES", WHICH HAS NO , 
1.300 REM UPPER LIMIT BUILT IN.) 
2.000 20 P=l 



3.000 30 P=P+4,S=0 



10.100 90 S=l, P=P+2 
11.100 100 GOTO 40 
12.100 110 END 

--EOF HIT AFTER 12.1 

'■'END© 

J_OFF © 

- accounting summary - 



RULES FOR USE OF IN 

The rules applicable to the IN command are summarized below. For ease of reference, the IN command format 
is repeated: 

IN n[,i] 

1. If n matches a sequence number already in the file, the first (or only) insertion line replaces the identi- 
cally numbered line in the file. 

2. If n does not match a sequence number in the file, the first (or only) insertion line n is inserted immedi- 
ately following the next lower-numbered line (or at the beginning of the file if a lower line number does 
not exist). 

3. If the insertion sequence number increment, i, is not specified. Edit assumes as a default value for i either 
the increment specified in the most recent record-level command given during the current Edit session, or 
the value 1 if no increment has been previously specified. 

4. Following each record insertion. Edit prompts for further insertion lines with Incremented sequence num- 
bers, until either the incremented sequence number equals or exceeds a sequence number already existing 
in the file, or the user responds with a carriage return only, (In the first case. Edit rings the console bell 
and returns immediately to command-input mode, issuing an asterisk.) 

RULES FOR USE OF MERGE 

A more complete form of the MERGE command than initially presented is 
MERGE fid^[,n^[-n2jjINTO f'd2'"3[-"4] f'] 

The optional increment value, i, was not previously presented. It is used to control renumbering of merged records. 
For example, by specifying a small fractional (decimal) increment it is possible to pack more records into the desti- 
nation file than might otherwise be possible. The rules for MERGE are as follows: 

1. The sequence numbers no - n^ specify the range of records to be deleted from the destination file (fld2), 
whether or not a one-for-one replacement occurs. (If n. is omitted only record n„ is deleted, i.e. , n^ is 
assumed as the value For n^.) 
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2. Sequence numbers n] -n2 specify the maximum range of lines to be transmitted from the source file (fidi); 
default value of ni-n2 is 1 through EOF. If no is omitted, only record n, is merged. (The actual number 
of records moved is controlled by the next sequence value above n^; see rule 4 below. ) 

3. Renumbering of the records from fid, in fid_ proceeds from n_, incrementing either by i or the default 
value, 1. 

4. Records n^ through n2 are moved into the interval no - n^ on fid/^, renumbered, until either the incre- 
mented sequence number of a moved record equals or exceeds the sequence number of the successor of n ., 
or the range of records n^ - n_ is exhausted. 

5. Value n„ may equal n,; n. may equal n_. 

Note these characteristics of MERGE: (1) the number of fid^ records moved is largely independent of the number of 
fid2 records deleted; (2) sequence number discontinuities may be introduced into fid2; and (3) by adjusting the in- 
crement value, the set of deleted records may be replaced by a much larger set of records. Note also that though it 
is a file-level command, MERGE has record-editing capabilities. 

The rules for IN and MERGE can be used as a general guide to the operation of other record-level commands with 
similar formats. 

STRING SEARCH COMMANDS 

The string-search type of command involves an automatic search by Edit for the occurrence of a certain string of 
characters within specified columns of a range of records. The records are searched one at a time and, if a "hit" is 
made on one or more of the records, the action specified by the command is performed (type or delete record). You 
specify the range of records to be searched, the string to search for, and the record columns within which the search 
is to be made ("all" by default). Edit does the rest. Note that the line number is not considered a part of the rec- 
ord and that column 1 is the first character of the record. 

Two string-search commands are available at the record -editing level. 

• Find and Type Records. 

• Find and Delete Records. 

The command formats are 

FT n ^ [-n^, /string/[,c ^[/C2]] 
and 

FD n^[-n2],/string/[,c^[,C2]] 
where 

n. Is the sequence number of the first or only record to be searched. 

n^ is the sequence number of the last of a range of records to be searched (default value = n J. 

string delimited by slashes (/. . ./), is any sequence of characters that may exist In the file. 

c, is the number of the column at which the search Is to start in each record (default value = 1). 

c„ is the number of the column (inclusive) at which the search is to end in each record (default value =140). 

The specified string must be found entirely with!;-; the columns specified. The columns of a record (or line) are 
numbered from 1 through 140, and though 72 is the upper limit for a Teletype line, columns 73-140 may exist in 
a record, as discussed below. (Other string-search commands are available at the Intrarecord-edlting level, and 
are generally more useful and efficient than those described above.) 
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HOW TO ENTER MULTILINE RECORDS 

On a terminal unit having an inherent line-width limit of less than 140 (e.g.. Teletype models 33, 35, and 37), 
a single, multiline record may be entered into a file (using the BUILD or IN commands, for example) in either of 
two ways: 

1. Using the local-carriage-return key marked LOG CR, if present, to "break" the input line without releasing 
it to the system. 

2. Using the simulated local-carriage-return sequence @©for the same purpose. 

Either method permits entering a record of up to 139 characters plus (g) on virtually any terminal unit. 
Example 14. Using String-Seorch Commands and Local-Carriage-Return 



J_EDIT @ 

EDIT HERE 

*COPY LOPRIM TO SCRATCH© 

The user copies his program to a new file in order to experiment with FT, FD, and IN. 

*EDIT SCRATCH® 
*FT 2-15, /P=/ ® 

He requests a search of records 2 through 15, all columns, for the character string "P~", with the 
record displayed on each hit. 



2 


000 


20 


P=l 




3 


000 


30 


P=P+4,S=0 


10 


100 


90 


S=l, P= 


=P+2 


--EOF HIT AFTER 12 


1 



*FT 1-13, /=P/@ 

He then asks for a search on "=P" in lines 1 through 13. 

3.000 30 P=P+4,S=0 

6.000 60 IF Q^vi=P THEN 80 
10.100 90 S=l. P=P+2 
--EOF HIT AFTER 12.1 
*FT 1-2, /PR/ @ 

He now asks for a search on "PR" in lines 1 through 2. 

1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 
1.100 REM (THIS PROGRAM IS A LIMITED VERSION OF 
1.200 REM MY PROGRAM "PRIMES", WHICH HAS NO 
*FT 1-2, /REM/, 4, 60 @ 

He tries a "negative" test of the column-delimiting capabilities, 

--NONE 



*FD 1.1 -2, /REM/© 

then a find-and-delete of records 1.1 through 2, inclusive, containing "REM". 

—003 RECS DLTED 
*TY 1-4© 

He requests display of results. 
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1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 

2.000 20 P=l 

3.000 30 P=P+4.S=0 

4.000 40 FOR 1= 5 TO SQR(P)+1 STEP 2. 
■±IH 1.5@ 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION 0F©@ 
PROGRAM "PRIMES", WHICH HAS NO SET UPPER LIMIT,)® 

He fries to reenter former lines 1.1 and 1.2 as one record, with a local line-break (©©)• 

*FT 1-3, /REM/® 

1.000 REM GENERATE PRIMES OVER 3 AND UNDER 1000 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OFPROGRAM "PRIMES". WHIG 

H HAS NO SET UPPER LIMIT.) 

Note, (1) that the user neglected to supply a blank (or space) following "of" prior to or after the 
local carriage -re turn, and (2) that the system "folds" the record indiscriminately when the physical 
line-width limit is reached. 

*END ® 



INTRARECORD COMMAND USAGE 

The intrarecord commands make changes within an individual record. They generally manipulate character strings. 
Intrarecord commands may only be given after the user selects an intrarecord mode with the SE, SS, or ST command. 
The SE command will be discussed below as an example of selecting an intrarecord mode. 

The SE (Select Intrarecord Mode) command simply selects a range of records, and optionally a field within each rec- 
ord, for subsequent intrarecord "processing" commands to operate on. The selection remains in effect for any number 
of subsequent commands until a new selection is made or a record editing command is given. 

After the SE is given. Edit prompts for further commands. You can then issue one processing command or several 
commands separated by semicolons (;) on the same input line. 

If one command is issued per line, the processing spcified by that command is performed against each record In the 
range specified by the SE. However, if more than one command is issued per line the whole set of commands will be 
processed successively against the first record, then against the second record, etc. (Obviously, if the range selected 
is only one record, the result is the same in either case.) 

The format of the SE command is 

SEn^[-n2][,c^[,C2]] 

where the meanings and defaults of the record and column selection parameters are the same as for the FT and FD 
string-searching commands. 

Two very useful and similar processing commands are S (String Substitution) and D (Delete String). The S command 
format is 

[ j]/stri ng ^/S/stri ng^/ 

where 

string, is the string to be searched for. 

string^ is the string to be substituted In place of string^. 
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] is an integer that indicates that only the ]th occurrence of string] within the search field of each record 

is to be replaced by string- (default value = 1). If all occurrences of string are to be replaced, ] must be 
specified as zero. 

The D command format is 

[]]/string/D 
where 

string is the string to be deleted. 

j has the same meaning as in the S command. 

Note that when substituting a longer string for a shorter string, the remainder of the line (if any) is moved right only 
as far as needed to preserve a single-blank separator if at least one blank existed to the right of the original string. 
That is, in certain cases multiple blanks to the right of the insert may be lost. (This is useful in preserving columnar 
alignment.) 

In this regard, you may include initial, embedded, or terminal blanks (i.e. , spaces) in either string. Edit treats the 
blank in general like any other printing character, the major exception being the suppression of multiple blanks in 
certain cases of string substitution and deletion. (A Blank-Preservation-Mode command, BP, in intrarecord opera- 
tions provides for cases where multiple blanks must not be lost, as in "quoted" character-string literals.) 

A number of other very useful, more specialized intrarecord commands exist for record modifications, but most of 
these are logical shortcuts to results that can usually be achieved with S and D commands only. 

The two intrarecord display commands, TY(Type, Including Sequence Number) and TS (Type, Suppressing Sequence 
Number) are analogous to their record-level counterparts, but do not specify record numbers (i. e. , you enter TY or 
TS only). With or without sequence numbers, the commands display the currently active record(s), as illustrated by 
the following example. 

Example 15. Using Intrarecord Commands 



lEDIT SCR/^TCH@ 

EDIT HERE 

*FT 1-2, /PROG/ @ 

The user enters the FT command to find and type lines containing PROG, within the range 1 through 2, 
inclusive. (Only line 1.5 should satisfy the requirement.) 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OFPROGRAM "PRIMES". WHIG 
H HAS NO SET UPPER LIMIT .) 
*SE 1.5@ 

He then enters the intrarecord mode selection command, which is required to fix the error in the line 
by string substitution. 

*/OFPRO/S/OF PRO/ @ 

He substitutes OF PRO for OFPRO (first instance only: j = 1 by default). 

^TY © 

1.500 REM (THIS PROGRAM IS A LIMITED VERSION OF PROGRAM "PRIMES". WHI 
CH HAS NO SET UPPER LIMIT.) 

*TS@ 

To see if the line-brecak problem in line 1.5 would disappear if the line were displayed without its se- 
quence number (as will happen under the BASIC subsystem), he uses the TS command. 
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REM (THIS PROGRAM IS A LIMITED VERSION OF PROGRAM "PRIMES". WHICH HAS NO 

SET UPPER LIMIT.) 
*0/P/S/N/@ 

This does in fact solve the problem. Now he wants to change all program variables named P to Ns. 
(This will have no effect on the program, since we have no variables named N.) 



1.500 REM (THIS NROGRAM IS A LIMITED VERSION OF NROGRAM "NRIMES". WHI 
GH HAS NO SET UNNER LIMIT.) 



He forgot to reset the range selection (SE). 

*0/N/S/P/ @ 
*SE 2-13 ® 
*0/P/S/N/© 

He reverses the N for P substitution in line 1.5, then sets proper range, and tries his original substi- 
tution again; 

9 STRINGS CHANGED 
--EOF HIT AFTER 12.1 

*TY@ 

and checks the result. 

2.000 20 N=l 

3.000 30 N=N+4.S=0 

4.000 40 FOR 1=5 TO SQR(N)+1 STEN 2 

5.000 50 Q=INT(N/I) 

6.000 60 IF Q*I=N THEN 80 

6.100 65 NEXT I 

7.100 66 IF N > 1000 GOTO 110 

8.100 70 NRINT N"TAB(0) 

9.100 80 IF S=l THEN 30 
10.100 90 S=l, N=N+2 
11.100 100 GOTO 40 
12.100 110 END 
--EOF HIT AFTER 12.1 



The substitution worked, except that it was not possible to delimit the search string narrowly enough; 
STEP to STEN, and PRINT to NRINT, were changed as well. 



*/STEN/S/STEP/;/NRl/S/PRI @ 
This reverses the change. 

*SE 4;TY@ 



The user requests a display of line 4 and, below, of line 8.1 
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4.000 40 FOR 1=5 TO SQR(N)+1 STEP2 
'^SE 8.1;TY@ 

8.100 70 PRINT N''TAB(0) 
^DELETE SCRATCH© 

Since he did not acfually need this file, he deletes it. 



. .EDIT STOPPED 
. .DELETED 
*END© 

_!_OFF © 

- accounting summary - 



TEL EDITING COMMANDS VS EDIT COMMANDS 

The TEL command !EDIT fid implies the sequence 
|EDIT 
*EDIT fid 

The TEL command ! BUILD implies the sequence 
|EDIT 
*BUILD 



*END 
I 



Both are, therefore, shortcuts provided for your convenience. However, note that the TEL EDIT command must 
be given before the Edit COPY command can be used, as distinct from the TEL COPY command. The TEL COPY 
command implies a call to the PCL subsystem; the COPY command under PCL is different from the Edit COPY 
command In scope, intent, and format. 

TEL/PCL COPY and other PCL commands are described In the next section. 

PCL 

The Peripheral Conversion Language, PCL, provides you with on-line facilities for initiating and controlling: 
Movement of files between peripheral storage devices. 

Movement of files between peripheral storage devices and RAD or disk pack storage (or other forms of sec- 
ondary storage). 

Movement of files within disk storage. 

Concatenation of files and selection of records from files during file movement. 

Data-record formatting and code conversion during file movement. 

Deletion of files. 

File building on any type of device or storage media from an on-line terminal. 
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• Display of peripheral input-device files or RAD or disk pack files on an on-line terminal. 

• Listing of a RAD or disk pack file directory or of file names on a labeled magnetic tape. 

• Positioning (and releasing) of magnetic-tape volumes. 

The peripheral storage devices referred to may be 

1. Magnetic-tape drives: Xerox labeled, ANS labeled, or unlabeled tape. 

2. Unit-record devices: card punch and line printer (card reader cannot be requested on-line). 

As mentioned before, one common characteristic of peripheral devices Is that they generally require operator Inter- 
vention, e.g., for the mounting and dismounting of physical file volumes. Therefore, an on-line user must be specially 
authorized In order to be able to use these devices via PCL (or any other on-line means); otherwise he will simply 
receive an error message on any attempt to do so. 

Many of the facilities listed above are mainly of Interest to the experienced on-line user doing the kinds of pro- 
gramming that were heretofore necessarily restricted to central-site batch operations: commercial and large-scale 
scientific applications Involving large volumes of Input and output data, system development, etc. Actually, the 
complete set of PCL facilities, plus the TEL SET command and direct user-to-operator messages, provide control of 
total system resources analogous to that obtainable only with "hands on", central-site batch operations under pre- 
vious systems. 

We will describe only the PCL functions commonly used by all on-line users. These Include keyed-file merging, 
building of unkeyed files, concatenation of unkeyed files, terminal display of either type of file, listing of file 
names, and file deletion. 

PCL COMMANDS 

The PCL COPY, L (which is the TEL form of the PCL LIST command), and DELETE commands may be given at TEL 
level, but PCL must be called explicitly (IPCL) for all other PCL commands. PCL prompts for command Input with 
the less-than (<) character, and for file Input and responses to questions with a period. 

The PCL commands covered here are COPY, LIST, DELETE, and DELETEALL, COPY allows a vast array of options In 
Its variable field; it Is the workhorse of the PCL language. Therefore, only a subset of the possible variations of the 
command Is described here. 

The COPY command format is 
Cf 



:[opY] sd[/fid[,fid]. . .] ^^^^^ dd{/fid]J 



where 

sd may be DC, CR, ME, operational label, stream-id, or: 

DP^serial no.[-rt] 

LT^'^serial no[-rt] 

AT[#serial no.][-rt] 

FT*serial no.[-rt] 

where rt is the 2-character identifier of a device that was defined at SYSGEN to be a resource. 

fid is a file identification, for DC, DP, LT, or AT files only; normally only a file name. 



Wherever TO is specified, ON may be substituted. 



30 PCL 



90 16 92D- 1(2/74) 



dd may be DC, CP, LP, ME, operational label, stream-Id, or: 

DP^serial no.[--rt] 
LT ["^serial no.][-rt] 
AT[#serial no.][-rt] 
FlC'^serial no.][-rt] 
where rt is the 2-character identifier of a device that was defined at SYSGEN to be a resource. 

Each PCL identification can be followed immediately by one or more special options in parentheses: i.e., d (option) 
or d/fid (option). If the default device code DC is not explicitly specified, the slash (/) preceding fid, maybe 
omitted; see the following example. 

If TO is specified, a new file i:; created (and must not already exist). If OVER is specified, the output file may 
exist; and if it does It will be deleted and replaced by a copy of the Input file. The TO/OVER clause is optional 
following a prior COPY specifying a TO/OVER destination file or device (during the same session with PCL). If 
the to/over clause Is omitted under these circumstances, the last-named file will be extended according to the 
file-convention. A subsequent TO/OVER clause or an exit from PCL terminates file extension. 

If multiple source files — e.g., FILA, FILB, FILC — are specified, the several file contents are either concatenated. 
I.e., joined end to end, on the destination file In the case of unkeyed flies, or merged on the basis of record-key 
values In the case of keyed files. Both cases are illustrated in the following examples. 

The remaining commands to be discussed In this Introduction to PCL are LIST, DELETE, and DELETEALL. 

LlISTj lists all your disk-file names (I.e., all names In your account directory). This is the simplified form 
of the LIST command. Additional specifications allow the user to list the files that are on a particular 
device. 



[DC/] 

DP#serIal no.[-rtJ/ 



d[elete] 

GEN to be a resource. 



fld[,fld]. . . deletes the specified files. The rt option specifies the 

2-character Identifier of a device that was defined at SYS- 



DELETE A L[L] 



[DC/] 

DP#serIal no.[-rt]/ 



[from]L,to] deletes all flies In the log-on account if 'from' and/or 'to' 
are not specified. Deletes a range of files In the log-on 
account if 'from' and/or 'to' are specified. 'From' and 'to' are sort keys or file names. The rt option 
specifies the 2-character identifier of a device that was defined at SYSGEN to be a resource. With this 
command, PCL asks for a confirmation: 

D ELETEALL? 

.YES$ © ("YES$" is the only correct positive response.) 



Example 16. Keyed-File Update and Display, Using PCL COPY 



The user wants to produce another version of the PRIMES program that will allow him to set, via the terminal, 
the range of the prime numbers produced during each run. He creates the modification files using Edit BUILD, 
but uses PCL COPY to achieve the actual file updating. 



j_BUILD MODljl, .125 @ 

The user wants to build a file starting with sequence number 1 and incrementing by only . 125, Instead 
of the standard (default) Increment of 1. Note that we have added an I parameter (. 125) to BUILD 
that corresponds to that of MERGE and INsert. 
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1.000 10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS© 
1.125 11 PRINT 'ENTER LOWER BOUND FOR PRIMES'® 
1.250 12 INPUT L @ 

1.375 13 PRINT 'ENTER UPPER BOUND FOR PRIMES'© 
1.500 14 INPUT U© 
1.625 © 
IBUILD MOD2,7.1,.5 © 

He requests a second new file, starting with sequence number 7.1, but incrementing by .5 in this case. 

7.100 67 IF P<L THEN 80© 
7.600 68 IF P<U THEN 110© 
8.100 © 
_!_COPY L0PRIM,M0D1,M0D2 TO VPRIM © 

He requests PCL to copy files LOPRIM, MODI, and MOD2, in succession to form new file VPRIM. 
Note that these are keyed files, and as such are not simply linked together end-to-end on VPRIM. 
MODI Is merged with LOPRIM, records from MODI replacing any records from LOPRIM having 
matching keys, and all nonmatching records falling into their natural sequence. The same process is 
repeated between MOD2 and the results of LOPRIM, MODI — and so on If more files were specified. 
(The source files themselves are not modified In any way. ) However, the three input files may be con- 
catenated without loss of any records by using the LN option (after VPRIM in the command) to assign new 
keys. 
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ICOPY VPRIM TO ME @ 



He displays the results directly, using the PCL COPY command. Note that ME is a PCL identification 
code, not a name; VPRIM, not being a PCL identification code, is understood by default as DC/VPRIM. 



10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS 

11 PRINT 'ENTER LOWER BOUND FOR PRIMES' 

12 INPUT L 

13 PRINT 'ENTER UPPER BOUND FOR PRIMES' 



14 INPUT U 
20 P=l 



65 NEXT I 

67 IF P<L THEN 80 

68 IF P>U THEN 110 
70 PRINT P' 'TAB(O) 



110 END 



muIT VPRIM© 
EDIT HERE 
*TY 1-13 @ 



The user then displays the same results using Edit. 



1.000 10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS 

1.125 11 PRINT 'ENTER LOWER BOUND FOR PRIMES' 

1.250 12 INPUT L 

1.375 13 PRINT 'ENTER UPPER BOUND FOR PRIMES' 

1.500 14 INPUT U 



2.000 20 P=l 



3.000 30 P=P+4.S=0 

4.000 40 FOR 1=5 TO SQR(P)+1 STEP 2 

5.000 50 Q=INT(P/I) 



6 


.000 


60 


IF Q-' 


<I=P 


raEN 80 


6 


.100 


65 


NEXT I 


THEN 




7 


.100 


67 


IF P<L 


80 


7 


600 


68 


IF P>U 


THEN 


110 


8 


100 


79 


PRINT P' 'TAB(O) 


9 


100 


80 


IF S=l 


THEN 


30 


10 


100 


90 


S=l, P= 


=P+2 




11 


100 


IOC 


) GOTO 40 




12.100 110 END 
--EOF HIT AFTER 12 


1 





'"'END © 



The last example points to several differences between the Edit COPY and the PCL COPY: The Edit COPY can only 
specify disk filenames; the PCL COPY can specify or imply devices (e.g., ME, DC, LT)and filenames, either singly or 
in combination as appropriate. Note that the specification DC/ME is possible and results in no ambiguity, though in 
this case "DC/" must be specified or the file name may be written as 'ME'. A second difference Is that the PCL COPY 
TO ME, though It accepts keyed files, does not display the keys as sequence numbers as does Edit TY; it is function- 
ally the same as Edit TS In this respect. 

The output option K must be used to display keys (in addition to the record sequence numbers) in a format comparable 
to the Edit TY display. 
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The next example is designed simply to illustrate these differences as well as to further clarify the merging action 
of PCL COPY on keyed files. 

Example 17. Keyed-File Update and Display (Further Examples) 



IBUILD FILA @ 

1.000 LINE 1 IN FILA© 

2.000 LINE 2 IN FILA© 

3.000 LINE 3 IN FILA© 

4.000 LINE 4 IN FILA© 

5.000 © 
IBUILD FILE,. 5,. 5© 

Here the user requests a new file starting with sequence number .5 and incrementing by .5 also 

0.500 LINE 1 IN B © 

1.000 LINE 2 IN B © 

1.500 LINE 3 IN B © 

2.000 LINE 4 IN B © 

2.500 LINE 5 IN B © 

3.000 LINE 6 IN B © 

3.500 LINE 7 IN B © 

4.000 © 
I^BUILD FILC,2,.75© 

and a new file starting at 2 and incrementing by .75. 

2.000 LINE 1 IN C © 

2.750 LINE 2 IN C ® 

3.500 LINE 3 IN C © 

4.250 LINE 4 IN C © 

5.000 LINE 5 IN C © 

5.750 LINE 6 IN C © 
6.500 © 
2_C0PY FILA,FILB,FILC TO DC /ME © 

He combines the three files on new disk file ME. 
2.C0PY DC /ME © 

With PCL COPY he displays file ME on device ME. 



LINE 


1 


IN 


B 


LINE 


2 


IN 


B 


LINE 


3 


IN 


B 


LINE 


1 


IN 


C 


LINE 


5 


IN 


B 


LINE 


2 


IN 


C 


LINE 


6 


IN 


B 


LINE 


3 


IN 


C 


LINE 


4 


IN 


FILA 


LINE 


4 


IN 


C 


LINE 


5 


IN 


C 


LINE 


6 


IN 


C 


lEDIT ME © 
EDIT HERE 



*TY .5-6 © 

Then he displays it with Edit. 
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0.500 


LINE 


1 


IN B 


1.000 


LINE 


2 


IN B 


1.500 


LINE 


3 


IN B 


2.000 


LINE 


1 


IN C 


2.500 


LINE 


5 


IN B 


2.750 


LINE 


2 


IN C 


3.000 


LINE 


6 


IN B 


3.500 


LINE 


3 


IN C 


4.000 


LINE 


4 


IN FILA 


4.250 


LINE 


4 


IN C 


5.000 


LINE 


5 


IN C 


5.750 


LINE 


6 


IN C 


—EOF HIT AFTER 


5.75 



*END© 

Note that the merging action of the multiple-file PCL COPY eliminates duplicately keyed records on 
file ME by successive replacement: record n from FILB replaces record n from FILA, and is in turn re- 
placed by record n (if any) from FILC. Only record 4.000 survives from FILA, for example. If the LN 
option had been used on output, all records in the three input files would have been kept, and the rec- 
ords in file ME would be assigned new keys. 

_!_PCL(S) 

PCL POO HERE 

<LIST @ 

Now he asks for a listing of current disk-file names, to see which are deletable. 

FILA 
FILB 
FILC 
LOPRIM 
ME 

MODI 
M0D2 
PRIMES 
VPRIM 

<DELETE FILA, FILB, FILC, 'ME' ,M0D1,M0D2© 
6 FILES DELETED 



<END © 



Example 18. Building and Concatenating Unkeyed Files 



In this example, the user creates two unkeyed files using PCL COPY; in most real instances of file concatena- 
tion, however, the files are outputs of other processors, e.g., FORTRAN. The user copies the files in the 
desired order to a single new file. A display of the resultant file shows the ordering of records produced by a 
multiple unkeyed-file copy. This example also shows how to copy a file to the system line printer. (Note 
that permission for such use of central-site peripherals requires explicit installation authorization; the system 
carries a record of this authorization.) 



_!_FCL© 

PCL DOO HERE 



<COPY ME TO A @ 

The user requests a copy of terminal input to file A. 
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J1.1ST LINE IN A @ 

_^2ND LINE IN A@ 

j^3RD LINE IN A© 

^4TH LINE IN A @ 
^ (g)F 

He enters input to new file A from the terminal. PCL prompts for input of each data line. An Escape F 
sequence ends the data input, i.e., indicates end-of-file. 

<_COPY ME TO B© 
^IST LINE IN B® 
_^2ND LINE IN B@ 
^3RD LINE IN B © 
^4TH LINE IN B© 

He enters input to new file B from the terminal. 

<COPY DC/A,B TO DC/C © 

He copies files A and B in succession to form new file C, incidentally showing the syntax of explicit 
device identification (optional) in the case of multiple-file specification. 

<_COPY C TO ME © 

He now copies the contents of file C to the terminal. 



1ST 


LINE 


IN 


A 


2ND 


LINE 


IN 


A 


3RD 


LINE 


IN 


A 


4TH 


LINE 


IN 


A 


1ST 


LINE 


IN 


B 


2ND 


LINE 


IN 


B 


3RD 


LINE 


IN 


B 


4TH 


LINE 


IN 


B 



<_COPY A TO LP © 

He then asks PCL to print file A on the system printer. 

<DELETE A© 

1 F IL ES DELETED 
£END© 
I 
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5. USING LANGUAGE PROCESSORS 



INTRODUCTION 

The term "language processor" refers to a processor that processes a specific programming language. Such processing 
consists essentially of some form of translation of the source language to the internal language of the computer, or 
machine language . (This machine-language translation is also commonly referred to as "object code".) 

The most frequently used language processors available underCP-Vin on-line mode are BASIC, Extended FORTRAN IV, 
ANS COBOL, Meta-Symbol, and APL. Although these processors are also available for batch-mode operations, this 
guide is limited to a description of their on-line usage. 

It is important at this point to distinguish between a programming language and the on-line command language asso- 
ciated with it. You use statements (i.e., sentences) of the programming language to form a program, whereas the 
commands are used to control what is done to or with that program. This chapter is intended to illustrate elementary 
uses of the command languages. (Succeeding chapters cover increasingly complex usages.) Therefore, to understand 
the program content of any of the following examples, knowledge of the relevant programming languages is necessary. 

The following manuals contain descriptions of the language processors: 

BASIC/LN,OPS Reference Manual, 90 15 46. 
Extended FORTRAN IV/LN Reference Manual, 90 09 56. 
Extended FORTRAN IV/OPS Reference Manual, 90 11 43. 
ANS COBOL/LN Reference Manual, 90 15 00. 
ANS COBOiyOPS Reference Manual, 90 15 01 . 
Meta-Symbol/LN,OPS Reference Manual, 90 09 52. 
APL/LN,OPS Reference Manual, 90 19 31. 

BASIC 

The CP-V BASIC processor is a compiler for a significantly extended and enhanced Xerox version of the standard 
BASIC language (Beginner's All-Purpose ^Symbolic instruction Code), a mathematical language designed specifically 
for time-sharing usage. 

BASIC is particularly suited to small and medium scale computational applications. The outstanding advantage of 
BASIC is that it is easy to learn and simple to use. It is an ideal "starter" language, even though it does offer 
sophisticated problem-solving capabilities. 

The BASIC processor is called with the TEL command BASIC. The processor then prompts for either BASIC program 
statements or BASIC commands with a "greater than" (>) character. During program execution, it prompts for program- 
requested terminal input (if any) with a question mark (?). When you have finished using BASIC, you exit back to 
TEL by giving the SYSTEM command. 

Since BASIC includes a program-building and editing facility, a program file need not be built under EDIT (as is the 
general case for FORTRAN and Meta-Symbol programs). 

A useful Xerox enhancement of BASIC is its capability for direct execution of individual statements. This allows you 
to operate BASIC in the "desk-calculator mode", without building a program; it also provides a powerful on-line de- 
bugging feature. These topics are discussed in a later section of this chapter. 

PROGRAM BUILDING, EDITING, AND EXECUTION 

Having called BASIC, you build a source program simply by entering BASIC program statements —each beginning 
with the required one to fivedigitstepnumber (see following example) — In response to the prompt character (>). 
Typing error corrections can be made before the line is released with the @, @X, or X controls as usual. Program 
statements entered in this fashion reside in an internal program-text area and constitute the current program. 
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The complef-e sef of statemenl-s that are to constitute a given program need not be entered consecutively (e.g., 
BASIC commands may intervene) and need not be entered in a sequence corresponding to their step numbers. The step 
numbers of the individual statements completely control the logical ordering of the statements within the program, 
providing for automatic insertion, replacement, and deletion of single statements on the basis of relative step num- 
bers, as follow^s: 

• Insertion - A statement entered with a step number falling in numerical sequence between the step numbers 
of two previously entered statements is automatically inserted between those two statements. 

• Replacement - A statement entered with a step number matching the step number of a previously entered 
statement automatically replaces that previously entered statement. 

• Deletion - A step number followed immediately by@, i.e., a "null statement", causes any previously 
entered statement having a matching step number to be deleted. 

(Explicit editing commands that can affect more than one statement are covered in a subsequent section.) 

After entering a program in this manner, you can have it compiled, error-checked, and executed (if no detectable 
errors exist) by issuing the RUN command. Syntax (i.e., language) errors, if any, will be reported by BASIC, and 
a prompt character (>) issued. You may at this point correct these errors, via statement insertion, replacement, or 
deletion as described above. Note that when terminal input is requested by your program during its execution, a 
question mark (?) is issued as a prompt character. 

Once a program has been tested and is known to be working correctly, you can request subsequent execution with 
the command FAST instead of RUN. FAST bypasses the checking of indices for subscripted variables. 

The following example illustrates three intrinsic —or built in — functions! DEG(x) -convert x from radians to 
degrees; ASN(x) - calculate arcsin of x, in radians; and ABS(x) - use absolute value of x. The first two, 
DEG and ASN, are specific CP-V additions to the standard BASIC language. 



Example 19. BASIC Program Building, Editing, and Execution 



IBASIC® 

The user calls the BASIC subsystem, and begins to build a program, entering a BASIC statement In 
response to each prompt character. 

2.10 REM SAMPLE PROGRAM @ 

>^15 REM $A IN STMT 20 IS A STRING VARIABLE © 

>^20 $A = "COMPUTE ARC SINE OF X, IN DEGREES" © 

_>30 PRINT $A © 

>40 FOR I -X^ 1 TO 5 © 

After typing the minus-sign (or dash) character by mistake — i.e., by forgetting to shift— he uses a @), 
echoed as\, to erase it and continues. 

>_50 INPUT X © 

>^60 PRINT DEG (ASN(X)) " = ARCSIN OF "X © 

>70 NEXT I © 

_>80 END © 

>RUN .© 

He enters the final statement (step 80) and then requests compilation and execution with the RUN 
command. 
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16 : 18 NOV 09 RUNIDAA . . . 

COMPUTE ARCSINE OF X. IN DEGREES 
1.001 © 

5.72958E-02 = ARCSIN OF l.OOOOOE-03 
1.707 @ 

44.9913 = ARCSIN OF .707000 
1-0.707 @ 

-44.9913 = ARCSIN OF -.707000 
13.246 @ 

He now tries a value that is much too large. 

60 ASN-ACS ARC ERROR 

He gets an error message, and a return to editing/command level (v^^here he will enter additional 
j program statements for detecting the out-of-range condition). 

>55 IF ABS(X) > 1 THEN 90 @ 

>90 PRINT X; "VALUE OUT OF RANGE" @ 

>95 GOTO 70 @ 

>RUN © 

After inserting steps 55, 90, and 95, he tests again. 

16:27 NOV 09 RUNIDAA... 

COMPUTE ARCSINE OF X, IN DEGREES 
11.5 @ 
1.50000 VALUE OUT OF RANGE 

1© > 

He gets the desired result on the exception condition, and terminates execution. 



PROGRAM SAVING. LOADING, AND RENAMING 

A program created under BASIC can be saved on a pe manent file with the SAVE command, and can be subsequently 
reloaded for execution with the LOAD command. The command form SAVE ON filename (where filename does 
not name an already-existing file) creates a file named as specified, on which your current program is copied. 
If, on the other hand, you use the command SAVE OVER filename , your current program is copied on the 
named file. If the specified name is not that of an already existing file, a new permanent file is created. 

To retrieve a saved program, you use the command LOAD filename. In general, the LOAD command causes 
loading of the named program into the program-text area, but the results of this loading will depend upon the 
state of this area at the time the command is given. If the program-text area is empty, i.e., no current pro- 
gram has been entered or loaded during the current BASIC session, the saved program simply becomes the current 
program. 

If, however, the program -text area is not empty at the time of the LOAD, the result depends on the current 
operating mode, or status. If the status is not "running", i.e., not execution mode, then the statements of the 
saved program are "woven" into the current program, on the basis of step numbers. This "weaving" process Is 
analogous to a linked-file PCL COPY f,,f„ to f„. 

The result is not usually the one desired; it can be circumvented by using the command CLEAR, prior to the 
LOAD. The CLEAR command clears the contents of the program-text area, i.e., the current program. This 
command may be given at any time. If BASIC is in execution mode, or "running", the program-text area 
is automatically clear prior to loading. The operating mode can be ascertained at any time by use of the 
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STATUS command. Use it frequently to become familiar with mode tronr.itions. (The responses to STATUS ore 
EDITING, COMPILING, or RUNNING.) 

ADDITIONAL EDITING FACILITIES 

Two BASIC editing commands that facilitate the display and deletion of current-program statements are LIST and 
DELETE, respectively. These two commands have identical formats; LIST is shown: 

LIST [s^ [-S2]][.S3 [-s^]...] 

where s. is a step number. 
I 

If one or more pairs of dash -separated step numbers (si-s2, etc.) are specified, the corresponding range(s) of state- 
ments are listed or deleted. If only S] (,S3, etc.) is specified, only the corresponding individual statement(s) 
is listed or deleted. If no step number is specified in a LIST command, the entire current program is listed. 
Note: The command form DELETE © is ignored; to delete the entire program you must use the CLEAR command. 

Example 20. Program Modification, Saving, and Reloading 



(This example takes up at the point at which we left Example 19.) 

>10 @ 
>15 © 

The user deletes the two REM statements (which are not necessary to the program's operation) and, 
below, requests a display (LIST) of the current program. 

>LIST @ 

20 $A = "COMPUTE ARCSIN OF X, IN DEGREES" 

30 PRINT $ A 

40 FOR I = 1 TO 5 

50 INPUT X 

55 IF ABS(X) > 1 THEN 90 

60 PRINT PEG (ASN(X)) " = ARCSIN OF "X 

70 NEXT I 

80 END 

90 PRINT X ; "VALUE OUT OF RANGE" 

95 GOTO 70 

_>25 REM NEXT STMT SHOWS STRING CONCATENATION (+) © 

2:30 PRINT $A + ", TESTING FOR OUT-OF-RANGE VALUES" @ 

>40 FOR I =1 TO 2 © 

>^LIST 20-40 @ 

He inserts step 25, replaces steps 30 and 40, and lists steps 20 through 40 to observe the results. 

20 $A = "COMPUTE ARCSIN OF X. IN DEGREES" 

25 REM NEXT STMT SHOWS STRING CONCATENATION (+) 

30 PRINT $A + ". TESTING FOR OUT-OF-RANGE VALUES" 

40 FOR I = 1 TO 2 

>_RUN @ 

14 : 53 NOV 10 RUNIDAA . . . 

COMPUTE ARCSIN OF X. IN DEGREES, TESTING FOR OUT-OF-RANGE VALUES 

1.253877 © 

14.7071 = ARCSIN OF .253877 

2- .00000009 © 

-5.15662E-06 = ARCSIN OF -9.00000E-08 

80 HALT 
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>45 PRINT "ENTER SINE VALUE, PLEASE" @ 



He insert-s a final modification, then saves the program on new permanent file ARCSINE. 



>^SAVE OVER ARCSINE © 

>_CLEAR @ 

>_LOAD ARCSINE @ 

After clearing the program-text area, he loads the saved copy back in, and tries it once more (note 
the new current-program name when he executes it again). 

>_RUN @ 

15:04 NOV 10 ARCSINE... 

COMPUTE ARCSIN OF X. IN DEGREES, TESTING FOR OUT-OF-RANGE VALUES 

ENTER SniE VALUE. PLEASE 

2.001 @ 

5.72958E-02 = ARCSIN OF l.OOOOOE-03 
ENTER SINE VALUE, PLEASE 

1.002 © 

.114592 = ARCSIN OF 2.00000E-03 



80 HALT 



TEMPORARY SAVING, RENAMING, AND RENUMBERING OF CURRENT PROGRAM 

The FILE and NAME commands, used in conjunction with CLEAR and LOAD, provide a convenient short-cut 
means of temporarily saving the current program, e.g., for "backup" purposes prior to extensive modification, 
and of renaming the current program for the execution -report heading. (You will have noticed a default pro- 
gram name, i.e., RUNIDAA, in the previous examples —this default name varies from session to session.) 

The command FILE simply causes the current program to be copied onto a temporary file (known as the "runfile" in 
other Xerox operating -system environments). This copy of the program can be explicitly named by using the com- 
mand NAME newname prior to the FILE command. If the NAME command is not used (or no name is specified) the 
defauh- program name applies. At any point after a program has been FILEd, a CLEAR and then a LOAD, with no 
filename, reestablishes the field copy as the current program. The copy will remain on file during the whole termi- 
nal session until another program is FILEd over it. 

When using FILE and LOAD (no name), it is important to remember that these commands always refer to the last 
runfile referred to with a NAME command, if one or more have been issued. If not, the default runfile name Is 
"current". (The defaultVunfile name can be reestablished with a null NAME command, i.e. , simply NAME © . ) 
Multiple runfiles can exist concurrently, resulting from multiple pairs of NAME newname and FILE commands having 
been issued; they can be selectively retrieved by a LOAD name command. Note; If NAME newname is used, 
newname may not also be used as the name of a permanent file during the same terminal session. 

The command sequence for changing the execution name of a current program would be 



>NAME newname 

>FILE 

>CLEAR 

>LOAD 
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Note that in this instance the CLEAR command that precedes the LOAD is functionally unnecessary since the 
current program and the filed program are identical, but it is included because of resultant savings in proces- 
sing time and space. 

At any time you can cause your current program to be automatically renumbered by giving a RENUMBER (or 
REN) command. Its format is 

REN [UMBER] [s^ [,53 [,!]]] 

where 

s is the initial new step number (default value = TOO). 

s_ is the old step number at which to begin renumbering (default value = 1, i.e., "first statement"). 

i is the increment by which successive new step numbers are to be increased (default value = 10). 

(For example, REN alone is equivalent to RENUMBER 100, 1, 10; REN, 10 equivalent to RENUMBER 100, 10, 10; 
REN,,5 to RENUMBER 100, 1, 5.) 

This command allows you to clean up, or regularize, the numbering of your program with full control over the 
starting value, the point in the program at which to begin, and the step-value spacing. During the renumbering 
process, proper replacements are made for all step-number references, i.e., in GOTO statements, THEN clauses, 
etc., within the program. If the renumbered program was loaded from a permanent file, simply resaving it over 
the same file will make the renumbering "permanent". 

Example 21. Temporary Filing, Reloading, and Renaming 



(Continued from previous example.) 




>.FILE © 




The user files the current program (ARCSINE) on a temporary "runfile' 
name —whatever that is. 


, under the default "runfile" 


>_CLEAR © 




He then clears the current program, to play safe. 




>,LOAD VPRIM © 




>RUN© 




He loads and executes the program VPRIM, previously built under Edi 
over VPRIM, that file would no longer be keyed, as BASIC is not a 
BASIC step numbers are part of the file records, not record keys.) 


t. (If it were now to be resaved 
keyed-file oriented processor- 
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18:30 NOV 12 VPRIM. . . 

ENTER LOWER BOUND FOR PRIMES 
2100 ^ 

ENTER UPPER BOUND FOR PRIMES 
1250 @ 
101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 

193 197 199 211 223 227 229 233 239 241 
180 HALT 
> STATUS © 

Following a successful execution of VPRIM, he requests the current status of BASIC. 

RUNNING 
>_LOAD @ 

He now loads the default -named temporary file, without a preceding CLEAR, since clearing is 
automatic in execution mode. 

>_RUN @ 

18; 05 NOV 12 RUNIDAA... 

COMPUTE ARCSIN OF X. IN DEGREES. TESTING FOR OUT-OF-RANGE VALUES 

ENTER SINE VALUE, PLEASE 

1 @1. 

>_NAME ARC @ 

He breaks off execution, names another temporary "runfile", and (below) files the current 
program on it. 

>_FILE @ 
>^CLEAR @ 
>_LOAD @ 

Note here that LOAD with no name specified will refer to the last-named "runfile" (if any — 
otherwise to the default-named "runfile"). 

>_RUN © 

18:09 NOV 12 ARC... 

COMPUTE ARCSIN OF X, IN DEGREES, TESTING FOR OUT-OF-RANGE VALUES 

ENTER SIN]; VALUE, PLEASE 

?.4@ 

23.5782 = ARCSIN OF X , 

ENTER SINE VALUE, PLEASE 
_? @ j^ 
>^SYS @ 

This command, SYS, causes an exit from BASIC and a return to TEL. 

_!_OFF © 



DIRECT STATEMENT EXECUTION AND DESK-CALCULATOR MODE 

Direct statements are BASIC statements entered without a step number either in editing or execution mode. 
They can be executed either with or without a current program — the latter being called "desk -calculator 
mode". In normal execution mode, i.e., with a current program, direct statements are used for on-line de- 
bugging, or program verification. 
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Direct stal-ements are recognized as such by BASIC and are executed (if possible) immediat-ely . The most commonly 
used forms of direct statements in editing or desk-calculator mode are PRINT statements containing an arithmetic ex- 
pression, and one or more LET statements followed by a PRINT statement. For on-line debugging, GOTO, LET, and 
PRINT are commonly used, singly or in combination, referring to variables and statements in the current program. 



Most BASIC statements can be issued as direct statements; the few exceptions, e.g., FOR, NEXT, are statements 
that cannot be expected to "execute" by themselves in any meaningful way. 

A further enhancement of the direct-statement execution capability is the EXECUTE (or EXE) command, which 
is provided specifically for convenience in on-line debugging and verification. The command format is 

EXE [CUTE] [sg[-S2] 
where s. and s_ refer to step numbers in the current program. 

In either editing or execution mode, a step number reference causes one statement or a range of statements of the 
current program to be executed. Note that if a range is specified, the last statement in the range, s_, is not 
executed. (You can achieve the same effect by combinations of direct statements, but the EXECUTE command is 
significantly faster and more convenient. ) 

Example 22. Use of Direct Statements — "Desk-Calculator Mode" 



IBASIC @ 

>PRINT DEG(ASN(.5)) @ 



The user calls BASIC and immediately enters a direct statement, i.e., one with no line number. 
Note that (1) there is no current program, and (2) the user doesn't have to be in execution mode. 



30.0000 
>PRINT DEG(ASN(1.1)) @ 



Now he tries one that should result in an error comment. 



ASN-ACS ARG ERROR 
>LET X=SQR(2)/2 © 



Then he tries a sequence of two statements with a common variable. 

2:PRINT DEG(ASN(X)) @ 
45.0000 
>^SYS @ 

iOFF @ 

-accounting summary- 
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ABBREVIATIONS OF BASIC COMMAND VERBS 

All of the BASIC command verbs may be shorfened to the first three letters, i.e., CLE(ar), DEL(ete), LOA(d), etc. 
In addition, you may use the following short forms of the SAVE command: SAV N for SAVE ON, and SAV VER for 
SAVE OVER. 

Another direct-statement execution example follows, illustrating EXECUTE command usage. 
Example 23. Using the EXECUTE Command 



j_BASIC @ 

>_LOAD VPRIM @ 

>1 PRINT 'P='P;'I='I;'Q='Q;'S='S © 

The user inserts a statement that facilitates inspection of variable values as he executes selected 
portions of it below. 

>,LIST @ 

1 PRINT 'P='P;'I='I;'Q='Q; 'S='S 

10 REM GENERATE PRIME NUMBERS (>3) WITHIN USER-SET LIMITS 

20 PRINT 'ENTER LOWER BOUND FOR PRIMES' 

30 INPUT L 

40 PRINT 'ENTER UPPER BOUND FOR PRIMES' 



50 INPUT U 

60 F=I 

70 P=P+4,S=0 

80 FOR 1=5 TO SQR(P)+1 STEP 2 

90 Q=INT (P/I) 

100 IF Q^^I=P THEN 150 

110 NEXT I 

120 IF P<L THEN 150 

130 IF P>U THEN 180 

140 PRINT P' 'TAB(O) 

150 IF S=l THEN 70 

160 S=l, P=P+2 

170 GOTO 80 

180 END 

>RUN_@ 

13:02 NOV 18 VPRIM... 



P=0 1=0 Q=0 


S=0 


ENTER LOWER 


BOUND FOR PRIMES 


117 @ 
ENTER UPPER 


BOUND FOR PRIMES 



?17 @ 








11 








180 HALT 








>EXE 1 @ 








P= 19 1= 5 Q= 


3 


S= 


1 


>EXE 70-120® 








120 -EXEC- 


HALT 




>EXE 1 @ 








P= 23 1= 5 Q= 


4 


S= 






>LET U=50 @ 

Here the user enters a direct statement to change the upper-bound parameter. 

>EXE 110-150 @ 
23 

150 -EXEC- HALT 
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>EXE 


150- 


180 


© 




29 


31 37 


41 


43 


47 




180 


-EXEC- 


HALT 


>SYS 


@ 








jpFF 


@ 








-accounting summary- 



FORTRAN IV [F0RT4) 

The Extended FORTRAN IV processor Is a mathematical-language compiler that processes an extended version of 
the standard FORTRAN IV language. It is appropriate to the solution of medium- to- large scale computational 
problems, and offers full file input/output capabilities. Unlike BASIC — compile-and-execute processor — It 
produces savable and reusable object programs, eliminating the need to recompile frequently used programs. 

A related facility, the FORTRAN Debug Package (FDP), permits on-line debugging during program development and 
checkout. Use of FDP Is covered In Chapter 7, "Debugging User Programs". FORT4 accepts source-program input 
either from a previously built source file or directly from the user's terminal, a line at a time. Normally, the 
former method Is employed, the file having been built with the Edit processor. 

The line-at-a-tlme method has an advantage for novice FORTRAN users in that "conversational" syntax-error diag- 
nostic comments are Issued Immediately following input of the line to which they refer, an effective learning device. 
(When using this method, a source file can be preserved for subsequent modification and recompllation by means of 
the special compilation option SO, and an appropriate !SET command, as shown In a subsequent example.) 

The standard outputs of the compilation process are the compiled object program, called the relocatable object 
module (ROM), and error comments. A listing of the source program may be (and generally Is) requested, with the 
LS compilation option, described below. 

CONTROLLING THE COMPILATION PROCESS 

FORT4 Is called with the TEL command FORT4. The format of this command is: 



if°^T4[-r ][s:;erM[,iu6] 



where 

source specifies a disk file containing the source program. 

ME indicates source input from the user's terminal (the default assumption for this field). 

rom specifies that the relocatable object module produced by the compilation Is to be directed to a speci- 

fied file (fid), a logical device stream (stream-id), the card punch (CP), or no file or device (NO). If 
no rom specification is given, output Is directed to a special file that may subsequently be referenced by 
a dollar sign. 

list specifies the destination of source-listing output: either a disk file (fid), a logical device stream 

(stream-id), the terminal (ME), central-site line printer (LP), or no file or device (NO). 

Note that the ON or OVER qualifier refers only to the rom, but one of the two must be given if either rom or 
list is specified. For example: FORT4 ME ON ,LISTFIL. 

This command, then, serves to call FORT4, identify the input source, and direct the compiler outputs. 

Note that you can direct the compiler outputs prior to giving the FORT4 command with the .'OUTPUT, ILIST, and 
.'COMMENT commands (the latter allows a separation of source-listing and error-commentary destination). If the 
OUTPUT command is used, the default value for the rom given above does not apply. 
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After the FORT4 command, the processor responds with the question OPTIONS>, at which point you may enter one or 
more compilation options. These control the compilation process and are used primarily to request optional outputs or 
suppress standard outputs. The options controlling listing of outputs ore: 

LS - Produce source-program listing and full compilation summary. 

LO - Produce source- and object-program listing, and full compilation summary. 

PS - Produce partial Instead of full compilation summary (default option). 

NS - Suppress compilation summary. 

Note that if none of the above are specified, a partial summary only Is produced, as if the PS option were specified. 
The PS or NS option can be used in conjunction with LS or LO, or NS alone may be specified (no listing, no summary). 
If you use the LS or LO option, a destination for this output must be specified in the FORT4 command. 

There are many other options, mostly having to do with the nature of the source Input and the object output. 
These are described in the CP-V/TS Reference Manual, 90 09 07, and the FORTRAN IV/OPS Reference Man- 
ual, 90 11 43. 

If you enter source lines directly from the terminal (i.e., FORT4 ME . . . ), you may want to use the SO option, which 
requests that the source program be reproduced as an output; in this case you must assign this output (the M:SO DCB) 
to a file with a ISET command (see Chapter 11, "DCB Assignments"). Several examples are given below. 

Following a successful compilation, link-loading and execution of the resulting object program can be requested with 
the IRUN command. This command, as well as the related ILINK and [START commands are described in Chapter 6, 
"Loading and Executing Object Pr ocims". Simple uses of IRUN are shown In the following examples. 

In the following example, the user employs Edit to create a file, INPUT, containing the source program. Note that the 
source lines contain a tab character: for FORT4, only one tab per line is accepted, and Its value Is fixed by the com- 
piler as column /(regardless of specified setting). The example program computes the length of a three-dimensional 
vector, D, for Input values of X, Y, and Z. E ecution-time input to the program is initially from file DATA; Input 
is terminated by a zero value for X. Output is Initially directed to the terminal. 

The user then decides to execute again with new X, Y, and Z values from the terminal. Accordingly, he changes 
the DCB assignments for FORTRAN I/O units 5 and 6 so that data Input is from the terminal and program output goes 
to the disk file VALUES. To examine this output, he issues a ICOPYcommand to copy this file to the terminal. 

Example 24. Compiling and Executing FORTRAN Input from a File 



_!TAB£ 


7@ 












The 


user se 


l-s a tab value of 7, so that he can see the tab 


effect as he builds the file. 


_!_BUILD INPUT @ 










jL 


.000 


.© 


WRITE (6,100) ® 








2 


.000 


10@ 


READ (5,200) X,Y,Z © 








3_ 


.000 


_@ 


IF (X) 20,50,20 @ 








i\_ 


.000 


20 © 


D = SQRT(X**2+Y**2+Z''"V2) @ 








5_ 


.000 


.© 


WRITE (6,300)X,Y,Z,D @ 








6 


.000 


.© 


GO TO 10 @ 








7 


.000 


50© 


STOP @ 








8 


.000 


100 © 


FORMAT (7X,1HX,11X,1HY,11X,1HZ, 


IIX, 


IHD) © 1 


9_ 


.000 


_200 © 


FORMAT (3E) © 








10 


.000 


300 © 


FORMAT (4( IX, Ell. 3)) © 








11 


.000 


.© 


END © 








12 


.000 
He 


ouilds a 


file of source input, named INPUT. 
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IBUILD DATA® 

1.000 1.0,2.0,3.0® 
2.000 1.0,1.0,1.0 @ 
3.000 0.0© 
4.000 @ 

He builds a program-data file. 

ICOMMENT ON ME @ 

and requests error commentary at the terminal. 

1F0RT4 INPUT ON BIN @ 

He asks for a compilation of INPUT, with ROM output on BIN. 

EXT. FORTRAN IV. VERSION POO 
OPTIONS > ® 

and accepts the default option, partial summary. 

U WRITE (6.100) 



11; END 

HIGHEST ERROR SEVERITY: (NO ERRORS) 

The partial summary prints at the terminal. 

ISET F:5 /DATA; IN© 

The user assigns the file DATA to the F:5 DCB, and defines it as an input file. (This is a "file 
assignment". ) 

ISET F:6 UC © 

He assigns the user's terminal to the F:6 DCB, via the operational label UC. (This is a "device 
assignment".) 



!_RUN © 



He requests a run, i.e., link-load and execution, of the program. Since the RUN command assumes 
as its input the results of the latest compilation or assembly if no input file is specified, he does not 
need to specify BIN. 



LINKING $ 
PI ASSOCIATED 



The loader's messages print. 



X 


Y 


Z 


D 


.lOOE+01 


.200E+01 


.300E+01 


.374E+01 


.lOOE+01 


.lOOE+01 


.lOOE+01 


.173E+01 



^VSTOP^'^ 

Then the program's output appears, and a normal program-halt is indicated. 

ISET F:5 UC © 

The user resets the input unit to the terminal 

j_SET F:6 /OUTPUT ; OUT © 

and the output unit to a file, named OUTPUT. 
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IRUN BIN © 



He reruns, this time specifying the ROM name (not actually required in this cose, as explained 
above). 



LINKING BIN 
PI ASSOCIATED 
14.4,5.5,6.6 © 
20.0 @ 

The program -input-request prompt is given, and the user enters a set of values and a zero value to 
indicate end of data. 

VfSTOP* 

A normal program halt is indicated. 

jCOPY OUTPUT @ 

The user requests a copy of the output file to the terminal. 

X Y Z D 

.440E+01 .550Et01 .660E+01 .965E+01 



The next example shows a very simple program entered directly from the terminal. The user requests the source pro- 
gram to be reproduced (SO), and uses a ISET command to assign a source-output file, SOURCE. He also uses the 
I SET command to assign FORTRAN unit 6, the program output, to the terminal. 

Example 25. Submitting Terminal Input for FORTRAN Compilation 



iSET M:SO /SOURCE © 

The user sets the DCB for source output produced by the compiler, M:SO, to the file SOURCE. Here, 
since he does not specify a file function (e.g., IN, OUT), OUT is assumed by default. 

1©C \_ © 

This sequence will cause the FORT4 prompt character (>) to be excluded as part of the input line 
when tabbing. The backslash prints automatically as a result of the @ C sequence. 

_[_F0RT4 ME@ 

He asks for a compilation of direct terminal input. 

EXT. FORTRAN IV, VERSION POO 
OPT IONS > N S , SO @ 

He suppresses the partial summary (NS), and requests source output (SO). 

^C THIS EXAMPLE ILLUSTRATES HOW SOURCE LINES ARE ENTERED© 

>C DIRECTLY FROM THE TERMINAL, AND HOW A LINE IS CONTINUED. @ 

>_<S) WRITE (6,100) © 

>100© FORMAT (IX, : @ 

> C25HTHIS IS A CONTINUED LINE.)© 

_> © END © 

FORTRAN prompts for source input with >. Note that the C in the fifth line is in column 6, the rest 
following a tab starting in column 7. (The user assumes that the tab setting of 7 from the previous 
example is still in effect. ) 
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1@ c \_ @ 

The user turns off fhe tab relative mode. 
j_SET F:6 UC @ 

He sets the output unit to the terminal (operational label UC), 

j_RUN © 

and requests a rum. 

LINKING $ 
PI ASSOCIATED 
THIS IS A CONTINUED LINE. 



VfSTOP>'<' 
jCOPY SOURCE TO ME @ 

He displays the reproduced source file. 

C THIS EXAMPLE ILLUSTRATES HOW SOURCE LINES ARE ENTERED 
C DIRECTLY FROM THE TERMINAL, AND HOW A LINE IS CONTINUED. 

WRITE (6,100) 
100 FORMAT (IX. 

C25HTHIS IS A CONTINUED LINE.) 
END 

Note that the "to be continued" marker (:) in the fourth line has been stripped off by FORT4. 

lOFF @ 

-accounting summary- 



COBOL 

COBOL (COmmon Business Oriented Language) is a language that is especially efficient in the processing of business 
problems. Such problems typically involve relatively little algebraic or logical processing. Instead, they most often 
manipulate large files of basically similar records in a relatively simple way. This means that COBOL mainly em- 
phasizes the description and handling of data items and Input/output records. 

The COBOL compiler Is called from an on-line terminal by the following command: 
COBOL[--][°^N^Jro.][,,U,]] 

where 

source specifies a disk file containing the source program. 

ME indicates source input from the user's terminal (the default assumption for this field). 

ON indicates that ROM output is to be on a new file. 

OVER indicates that ROM output is to be over an existing file or on a new file. 
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rom specifies that the relocatable object module produced by the compilation is to be directed to a specified 

file (fid), a logical device stream (stream-id), the card punch (CP), or no file or device (NO). If no rom 
specification is given, output is directed to a special file that may subsequently be referenced by a dollar 
sign. 

list specifies that listing output is to go to a file (fid), a logical device stream (stream-id), a line printer (LP), 

the terminal (ME), or no device or file (NO). 

When the compiler is entered, it sends a request for options to the terminal. 

OPTIONS? 

If no options are desired, a carriage return may be entered follov/ing the request. This initiates the compilation. 

If compilation options are desired, the word COBOL must be entered followed by the codes for the desired options. 
These codes are separated by commas and terminated by a carriage return or line feed character which initiates the 
compilation. A few of the options that are available are 

GO — Specifies that a load-and-go copy of the object program is to be written via M:GO. 

LO — Requests an object program listing via M:LO. 

LS — Requests a source program listing via M:LO. 

SO — Requests source output via M:SO. 

Example 26 shows how to build and execute a COBOL program using the COBOL compiler. 



Example 26. Building and Executing a COBOL Program 



_!_TABS 9,13 @ 

The user sets the simulated tab stops for his terminal to columns 9 and 13. Since the COBOL prompt 
character will print in column 1 of his terminal, COBOLwill interpret these tabs asbeing set inS and 12. 

_!_SET M:SO DC / SOURCE @ 

The user wants the source output file (SO) to be named SOURCE. 

ICOBOL ME ON ROM © 

The user calls the COBOL compiler and specifies that source input is to be read from the terminal. 

COO COBOL 
OPTIONS? 

The compiler identifies itself and requests compiler options. 

$COBOL GO, SO @ 

The user enters a COBOL control command, specifying that he wants source output and a load-and-go 
copy of the object program. 

i IDENTIFICATION DIVISION.© 

$_ PROGRAM- ID. SIMPLE.® 

i DATA DIVISION.® 

$. PROCEDURE DIVISION.® 

$ PARA-1. DISPLAY 'A.O.K' UPON PRINTER.® 

i STOP RUN.® 
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The programmer enters a COBOL program and then enters ESCAPE F to indicate that the program is ready 
for compilation. The program is compiled and the following diagnostic message is output: 

Vo'oVNUMBER OF DIAGNOSTIC MESSAGES 0>'"'"VHIGHEST 
SEVERITY LEVEL O'''"'"'' 

_!_RUN ROM(NL)(NP) OVER LMN;BLIB : .COBLIB @ 

Since there were no errors in the program, the user decides to execute it. The RUN command specifies 
that an executable load module named LMN is to be built using the object module named ROM, no public 
libraries or core libraries are to be searched, the BLIB: library in the COBLIB account is to be used to 
satisfy any external references, and the load module is to be executed. 



LINKING ROM 



LINKING BLIB: 



A. O.K. 



The message A. O.K. is printed on the terminal because the terminal is the default LO device when 
COBOL is run in the on-line mode. 



META-SYMBOL |META| 

Meta-Symbol is a macro-assembler that processes an assembly language. Symbol, (which is a symbolic representation 
of the machine language) and macro-procedure language, Meta-Symbol (which is a powerful logical extension of 
the assembly language). Assembly language is the "lowest level" language normally used for programming. 

The advantage of Meta-Symbol programming is the maximum speed and efficiency that is possible in the resultant 
object programs. Its disadvantage is that it is more time-consuming to learn and to use than "higher-level" lan- 
guages such as FORTRAN. 

Also available is an extensive and sophisticated debugging processor. Delta, designed specifically — though not 
exclusively — for debugging Meta-Symbol object programs. Its use is covered in Chapter 7 and in Example 47. 

The META processor is called by the TEL command META. There are many examples throughout the following chap- 
ters that illustrate the use of META: 

Example 38 shows an assembly and execution. 

Example 43 shows use of OUTPUT, LIST, and COMMENT commands. 

Example 44 shows use of SET commands before calling META. 

Example 45 shows discontinuation and resumption of output while assembling with META. 

These examples all illustrate the use of META to assemble from a source file. META can also be used to assemble 
source lines directly from the terminal, as shown in the following example. Unlike the FORT4 processor however, 
diagnostics are not produced until after the END statement is received. ("Diagnostic" is a general term for the 
warning and error commentaries resulting from the error checking performed by the assembler.) 
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The format of the META command Is 



^ET4Mr][oVER[--]['"='^] 



where 



source specifies a disk file containing the source program. 

ME indicates source input from the terminal (the default assumption for this field). 

rom specifies that the relocatable object module produced by the assembly is to be directed to a specified 

file (fid), a logical device stream (stream-id), the card punch (CP), or no file or device (NO). If no rom 
specification is given, output is directed to a special file that may subsequently be referenced by a dol- 
lar sign. 

list specifies the destination of the source-program listing: either a disk file (fid), a logical device stream 

(stream-id), the terminal (ME), the line printer (LP), or no device or file (NO). 



Note that the ON or OVER qualifier refers only to the rom file, but one of the two must be given if either rom or 
list is specified. 

The effect of the META command variable field is to assign the M:SI (source input) DCB, the M:GO ("go", or object 
output) DCB, and the M:LO (listing output) DCB to the source, rom, and list specifications, or to their defaults. 
Note also that if these DCBs have been assigned previously in the session, either by an OUTPUT, LIST, FORT4, or 
prior META command, the corresponding default values given above do not apply. (The effect of the COMMENT 
command is to explicitly assign the M:DO (diagnostic output) DCB; i.e., to specify a destination for diagnostics 
separate from the source listing, if any.) 

After the META command is given, the processor asks for assembly options: WITH>. A description of these options 
for on-line usage can be found in the CP-V/TS Reference Manual, 90 09 07, Chapter 4. The only options we need 
mention here are SO (source output), which functions exactly as in a FORTRAN compilation — shown In the previous 
section — and SD (symbolic-debugging), which is covered in Chapter 7. Note that source-listing output is implic- 
itly requested or suppressed by the list parameter in the META command, unless a LIST command is given before the 
META command. 

Note also that the format of the assembler source listing is not very suitable for display at the terminal, and is best 
directed to the line printer (LP), or omitted. Comments go to the terminal (by default) in either case. 

Example 27. Using META to Assemble Terminal Input 



IMETA ME @ 

The user asks for an assembly of terminal input, with no source listing. 

WITH> @ 

He doesn't request any assembly options and, below, begins to type in the source lines following 
META's prompt character (>). (A tab setting and tab characters could be used to achieve the desired 
starting columns as shown in later examples.) 

>^'-THIS EXAMPLE ILLUSTRATES DIRECT INPUT FROM TERMINAL. © 
>;'-IT ALSO SHOWS HOW TO CONTINUE A LINE. @ 

> SYSTEM BPM @ 

> SYSTEM SIG7 @ 

> REF M:UC @ 
^START M:WRITE M:UC,(BUF,M; (CONTINUED LINE) @ 
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> ES), (SIZE, 26) (CONTINUATION) @ 

>: M:EXIT @ 

>MES TEXT 'EXAMPLE OF CONT' , ; @ 

>_ ' INUED LINE . ' @ 

>_ END START @ 

*liO UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL; 

* NO ERROR LINES 

mUN (NP)@ 

Here the library-search option NP is used to suppress association of the default public library, PI, by 
the loader, as it is only required for FORTRAN programs. 

LINKING $ 
EXAMPLE OF CONTINUED LINE. 

The program executes, printing its output, and control returns to TEL. 

!OFF© 



APL 

APL is an acronym for A, programming Language, the language invented by Kenneth Iverson. APL is an interpretive, 
problem-solving language. As an interpretive language, APL does not wait until a program is completed to compile 
it into object code and execute it; instead, APL interprets each line of input as it is entered to produce code that 
is immediately executed. As a problem-solving language, APL requires minimal computer programming knowledge; 
a problem is entered into the computer and an answer is received, all in the APL language. 

APL operates in three modes. In the Desk Calculator Mode, expressions may be entered for immediate execution. 
In the Function Definition Mode, expressions may be combined into programs and stored for future use. In the 
Function Editing Mode, functions that were previously stored may be modified. 

The APL examples in this manual are written for operation on a standard 2741 APL terminal (that is, a 2741 terminal 
with an APL typeball). See Appendix B of the Xerox APL/LN, OPS Reference Manual, 90 19 31, for a description 
of how to use APL with other terminals. 

Example 28 provides an example of logging on to CP-V with an APL terminal, calling APL, using APL in the Desk 
Calculator Mode, and logging off. In Example 29, APL is used in the Function Definition Mode and the Function 
Editing Mode. 



Example 28. Using APL in the Desk Calculator Mode 



The user identifies the 2741 terminal to the system. 

XEROX CP-V AT YOUR SERVICE 
ON AT 10;16 MAY 16, *73 
LOGON PLEASE: 2^66, SMITH @ 

The CP-V system identifies itself and the user logs on. 
10:17 05/16/73 2^6 6 50-37 Cl] 

oAPL @ 
APL-03/16/73 
CLEAR WS 
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Note that TEL prompts with a o character at an APL terminal. The user calls APL and APL 
acknowledges control and prints the workspace status. 

456t2095+74 © 



2625 



The user begins using APL in the Desk Calculator Mode by adding three numbers together. Note that 
APL provides the indentation but does not use a prompt character. 



LOS*. 5 @ 
UNDEFINED 

L05*0.5 

A 

The user then unsuccessfully attempts to take the square root of 105. 

105* . 5 © 
10.2^695077 

The square root operation is now successful. 

6 15 8 495 *2 © 
36 225 6U 2U5025 

In the above operation, the user requests the square of the numbers 6, 15, 8, and 495. 
)OFF © 

CPU =■■ .0069 CON= ;08 INT = 13 CHG = 

The user logs off from both APL and CP-V. If the command had been )OFF HOLD, the user would have 
been logged off from APL and control would have returned to TEL. 



Example 29. Using APL in the Function Definition and Function Editing Modes 



*® 


XEROX CP-V AT YOUR SERVICE 


ON AT 09:4«+ MAY 17. '73 


LOGON PLEASE: 356101 , KEYS (^ 


09:45 05/17/73 355101 22-39 [1] 


oAPL © 


>lPL-03/16/73 


CLEAR WS 


The user logs on and calls the APL processor. 


t^C^A HYP B @ 


He decides to define a function that will calculate the length of the hypotenuse of a right triangle. 


given the lengths of the two sides. The del (v) character signals function definition and is followed 


by the function name. 


[1] C ^ ((i4*2)+S*2)*0.5 © 


[2] V © 
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The system responds with CI 3 and waits for the first program line. Each successive line is also numbered 
until the routine is closed by another V. (The user could have closed the function by placing the V char- 
acter at the end of line 1 .) 

3 HYP ^ @' 

9 2 HYP 3 © 
92.04890005 

The user tries a few examples. 

lA GEOMETRY B © 

[1] 'FUNCTION WRITTEN BY M. W, SMITH' © 

[2] 'GIVEN A RECTANGLE OF • © 

[3] 'SIZE ' iAi 'BY ;5 © 

[U] ' PERIMETER: ' lA+B @ 

[5] ' AREA: ' iA^B © 

C6] ' DIAGONAL: ' ;A HYP B W @ 

The user writes a second function — one to calculate the perimeter, area, and diagonal of a rectangle. 
Note that he makes use of the previously defined HYP function within this function. He also made a 
mistake which will later need to be corrected. 

10 GEOMETRY 12 © 
The user tries to use the GEOMETRY function and receives the printout listed below. 

FUNCTION WRITTEN BY M, W, SMITH 
GIVEN A RECTANGLE OF 
SIZE 10 BY 12 

PERIMETER: 2 2 

AREA: 120 

DIAGONAL: 15.62049935 

After examining the printout, the user notes that the perimeter was not calculated correctly. The value 
should be twice the sum of the two sides. 

VGEOMETRY[.>*a22:i © 
The user indicates that he would like to modify line 4 of the GEOMETRY function beginning at column 22, 

[4] » PERIMETER: ' jA+B 

/// © 

[4] ' PERIMETER: ' i 2^A+B © 

FsT V© 

APL types line 4, performs a carriage return and spaces to column 22. The user types three slashes indi- 
cating that he wants the characters in columns 22 through 24 deleted. APL then retypes the line and 
waits, allowing the user to add new characters to the line if he so desires. The user types in 2xA+B. 
APL responds with the next line number, allowing the user to perform further modification to the func- 
tion if he so desires. The user has completed the modification that he planned and indicates this with 
a V character. 



10 GEOMETRY 12 © 
FUNCTION WRITTEN BY M, W, SMITH 



GIVEN A 


RECTANGLE OF 


SIZE 10 


BY 


12 


PERIMETER : 


44 


AREA : 




120 


DIAGONAL: 


15,62049935 
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The user tries the function again to see if it is working correctly and sees that it is. However, now he 
has second thoughts about the line that says "FUNCTION WRITTEN BY M. W. SMITH" and decides to 
delete that line. 




VGEOMETRYlll @ 




He opens the function and directs the system to line 1 . 


V 




The system prompts with El] and the user presses the ATTN key followed by the RETURN key. 


[2] 


V@ 




The user closes the function because no further editing is to be performed. 


10 GEOMETRY 12 @ 
GIVEN A RECTANGLE OF 
SIZE 10 BY 12 

PERIMETER; 4 4 

AREA: 120 

DIAGONAL: 15.62039935 




The user executes the function again and is pleased with the results. He lists the function definition 
for future reference, saves the 'workspace' containing HYP and GEOMETRY, and then logs off. 


[1] 
[2] 
[3] 
[4] 
[5] 


"^EOMETRYIW]® 
Vi4 GEOMETRY B 
'GIVEN A RECTANGLE OF • 
'SIZE ♦;>!.♦ BY ♦ ;B 
' PERIMETER: ';2x>l+S 
• AREA: ' lAxB 
» DIAGONAL: ♦ ;/l HYP B 


[6] 


~V@ 


)SAVE MYMATH @ 
MYMATH SAVEB 10:00 MAY 17, '73 
)OFF @ 




In later sessions, the user can access HYP and GEOMETRY by using a )LOAD or )COPY command on 
the workspace named MYMATH which has been saved as a file. 
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6. LOADING AND EXECUTING OBJECT PROGRAMS 



LINK PROCESSOR 

The LINK processor consists of a one-pass link-editor/loader, or linking loader. The essential functions of the 
linking loader are to combine a number of separate program elements into a single executable entity called a load 
module (LM), and to load it for execution. You can request these two functions together with the RUN command, 
or separately with the LINK and START commands, respectively. In its linking operation, LINK merges 
internal symbol tables of several relocatable object modules (ROMs) presented to it and searches one or more sub- 
routine libraries to satisfy external references, where required. It makes full use of the CP-V Sigma hardware 
memory-mapping, allocating virtual data space as needed for association of a public core library such as the 
FORTRAN POor PI libraries, 

The linking loader must be used both to link-edit and load one ROM, i. e. , the output of one compilation or as- 
sembly, along with any necessary system-supplied service procedures and library subroutines, or to link two or more 
ROMs from separate compilations or assemblies, with their combined system-related references, into one load 
module, 

RUN COMMAND 

The TEL command RUN requests linking, loading, and executing of one or more ROMs. Forms of the RUN command 
are as fol lows: 

1. RUN (or RUN $) 

These forms simply request that the ROM created by the last compilation or assembly be linked, loaded, 
and executed. The two forms shown are synonymous. (Input is taken from the file last assigned to the 
M:GO DCB; LM output is placed on a special temporary file. ) 

2. RUN rom 

The ROM stored on the disk file specified by rom is to be linked, loaded, and executed, (LM output is 
placed on a special temporary file. ) 



RUN [rom] {g^^ J Imn 



ROM input maybe specified as in 2, above, but the LM output mayalso be directed to the file named Imn. 

In each case, the LM output is available for a subsequent reexecution via the START command. In all three cases, 
the public core library PI is implicitly associated with the object program to satisfy any external references, if 
possible. 

The general formats of the RUN and LINK commands are identical; thus the more complicated form shown for LINK 
in the next section is equally applicable to RUN, and vice versa. 

Example 30. Using the RUN Command 



lEDIT @ 

The user calls Edit. 

EDIT HERE 



*TA M @ 



He uses the Edit Tabs command (TA) and specifies the Meta-Symbol (M) tab setting (10, 19, and 37). (Other 
sets are available;see CP-V/TS Reference Manual, 90 09 07.) He then builds a source file, INPUT. 
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* BUILD 


INPUT © 












1.000 © SYSTEM© SIG7 © 

2.000 ^ SYSTEM© BPM© 

3.000 © REF© M:UC B 

4.000 BEGIN © MrWRITE© M:UC. CBUF. MESS) . (SIZE, 45) © 

5.000 © MrEXIT © 

6.000 MESS© TEXT© 'THIS MESSAGE SHOULD ',;© 

7.000 ©) 'PRINT AT THE TERMINAL.' © 

8.000 © DATA © X' 15000000' © NEW LINE CHARACTER 

9.000 © END © BEGIN © 
10.000 © 
*END© 
IMETA INPUT ON BIN © 


© 










META Is called to assemble source file INPUT wi 
listing produced. 


th ROM output going to file BIN 


and no assembly 


WITH> <^ 
















No 


assembly options are desired. 












i.RUN @ 


















A run is requested from the last compilation/assembly output, i.e 


, BIN in this case. 






LINKING $ 
















The 


system acknowledges the LINK function (the 


LINK processor 


is implicitly cal 


ed). 






DEFAULT CORE LIBRARY IS NOT NEEDED 














See 


Example 31 for meaning of this message. 












THIS MESSAGE SHOULD PRINT AT THE TERMINAL. 














The 


program's output is printed. 












j_OFF © 


















The user logs off. The temporary file containing 
ROM file BIN Is permanent, however. ) 


the load-module 


output of RUN 


is now 


lost. 


(The 



LINK COMMAND 

The LINK command requests link-editing, as does RUN, but does not cause loading and execution of the resulting 
load module, A more complex variable-field format than those shown in the previous section for RUN is given here: 

LINKrom^C/om^A.. ■ ' '■°f"nJ [qVER '"'"J ['''^I t' '''^2' " * ' ' ''*^nll 
where 

rom. specifies a disk file containing a ROM. 

Imn specifies a disk file for the LM output. 

lid. specifies a disk file containing a user's subroutine-library. 

In the format above, the several ROMs specified will be linked into one LM, with user's libraries lid] through lidp 
searched (prior to any public or system libraries) to satisfy external references, and the result placed ON or OVER 
Imn if specified. 
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In addition to the above, a parenthesized library-search code may be given. It is conventionally placed after the 
command verb, as in LINK (code) .... These codes request or suppress searching of system-supplied libraries, and 
are listed in Appendix D. Also, internal symbol tables for several ROMs may be merged or selectively deleted in 
the load module (see the CP-V/TS Reference Manual, 90 09 07, for these formats). 

Example 31. Using the LINK Command 



!LINK BIN ON LOAD @ 

A link-edit of the ROM on file BIN is requested, v/ith the resultant LM placed on LOAD. 
LINKING BIN 

The system responds to the LINK command. 

DEFAULT CORE LIBRARY IS NOT NEEDED 

The absence of a library search code (see Appendix D) in the LINK command causes this message if 
the default library (PI) is not required. The specification of search code NP will suppress associa- 
tion of PI and also suppress this message. 



_!_OFF @ 



Since the user does not want to execute the program at this time, he logs off. Files BIN and LOAD 
are permanent and can be accessed in subsequent sessions. 



- accounting summary - 



START C 

The ISTART command can be used to load and execute a load module produced by a prior LINK command, or to 
reexecute an LM already RUN (or STARTed), Three forms are applicable: 

1. START 

This form causes the last LM produced, either via a LINK or RUN, to be loaded and executed. Note that 
the prior LINK or RUN must have been given during the current terminal session; the load-module file may 
have been explicitly named (Imn), or named by default ($). 

2. START $ 

This form causes the last LM produced on the temporary file $ to be loaded and executed; the load-module 
file must have been named by default ($), 

3. START Imn 

This form causes the load module contained on the specified file to be loaded and executed. The LM may 
have been the result of either a LINK or RUN operation. 

See Chapter 8, User Programs, for an alternate way of loading and executing user-developed object 
programs: 

Example 32. Using the START Command 



J.START LOAD @ 

The load module LOAD created in Example 31 is loaded into core and execution begun. 
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THIS 


MESSAGE SHOULD 


PRINT 


AT 


THE TERMINAL. 




The 


program's 


output 


is 


printed. 


iOFF 


© 










- accounting 


summary 


- 
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7. DEBUGGING USER PROGRAMS 

Two dynamic debugging facilities are available for on-line use: 

• Delta processor for debugging Meta- Symbol programs. 

• FORTRAN Debug Package (FDP) for debugging Extended FORTRAN IV programs. 

"Debugging" is a general term for program-error detection and correction; dynamic debugging implies that the de- 
bugging process is carried out during the execution of an assembled or compiled program (as opposed to "desk 
checking"). Both Delta and FDP allow symbolic, i.e., source-program level references to elements of the object 
program. 



ASSEMBLY LANGUAGE DEBUGGING (DELTA) 

Delta provides conversational debugging capability for checkout and modification of Meta-Symbol programs at exe- 
cution time. Delta allows full use of symbolic references to elements of the object program, and enables you to 

• Control program execution, i.e., stop and restart it at any point, by means of breakpoints that you may 
insert in the program at your discretion. These breakpoints may be unconditional ("always stop"), condi- 
tional ("stop under certain circumstances"), or based on changes in data values. 

• Examine, modify, cind insert various program elements: instructions, constants, variable values, and en- 
coded data of all types and formats. This can be done both prior to execution and during any halt in 
execution (e.g., due to a breakpoint). 

• Trace continuous program execution by requesting a repeated display of specified sets of related informa- 
tion: register contents, switches, data values, etc., at specified points in the program. 

• Search programs and data for specific elements and values. 

Delta may also be used to write and check short Meta-Symbol or machine language programs. 

Please refer to the CP-V/TS Reference Manual, 90 09 07, for a comprehensive description and explanation of the 
commands available under Delta. 



EXECUTING IN DEBUG MODE 

To initiate execution of a program in debug mode, you must append the clause UNDER DELTA to your RUN or 
START command. Also, you must specify the SD (symbolic debugging) assembly option in response to WITH> to 
preserve the internal symbol table(s) of your program, if you want to refer to internal symbols with Delta commands — 
the normal case, (Internal symbols are those whose point of definition and points of use are entirely within one 
ROM.) 

Note that the global (or external) symbols of your program are always available for reference (see the following 
section). 

When UNDER DELTA has been specified. Delta intervenes between program loading and initial execution. At this 
point you can Issue debugging commands to examine or modify locations, insert breakpoints, start execution at a 
specified point, etc. Delta also assumes control at any halt in execution. 

The following example illustrates the usual method of using Delta in the debug mode of execution. A simple pro- 
gram is assembled with the SD option, run UNDER DELTA, and patched to create a missing M:EXIT statement. Note 
that before you refer to internal symbols you must tell Delta the name(s) of the desired symbol table(s) by ROM-file 
name (even though only one ROM may have been assembled). 

c 
To leave Delta and return to TEL, you issue a Y control combination. 
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Example 33. Assembling and Loading in the Debug Mode 



j_META ME ON BFILE @ 
WITH> SD @ 

The user calls META to assemble statements from the terminal. He uses the SD option to cause an 
internal symbol table to be produced. 

2. SYSTEM SIG7 © 

>. SYSTEM BPM@ 

>^ REF M:UC @ 

2.BEGIN MrWRITE M:UC, (BUF,MES) , (SIZE ,9)@ 

>MES TEXT 'GREETINGS' @ 

>. END BEGIN© 

* NO UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL: 



* NO ERROR LINES 

Although there are no assembly errors, the user notes that he forgot to include an MrEXIT in the 
program and decides to make this correction with patches. 

_!_RUN BFILE UNDER DELTA (NP) @ 
LINKING BFILE 

He links and loads UNDER DELTA, suppressing loading of the default library with the code NP. 
DELTA HERE 
"ring" 

Delta identifies itself and prompts with a ring of the console bell. 
BFILE ;S @ 

The user selects the internal symbol table associated with ROM BFILE. 
BEGIN/ CALl.l MES+.3 @ 

This command opens the cell at local lOn BEGIN and displays its contents. 
BEGIN (X/ .410C004 © 

A command is now entered to cause the contents of BEGIN to be displayed in hexadecimal format. 
The user terminates the command with the tab-key sequence, CONTROL I, which causes the cell 
addressed by this command (location C004) to be opened and displayed. 

MES+.3/ .11008C3C © 

MES+.4/ .30000000 (^ 

MES+,5/ .COOl © 

MES+.6/ .9 © 

The contents of the function parameter table (FPT) referenced by the M:WRITE (at location BEGIN) ore 
displayed. Note that location C004 is shown symbolically as MES+. 3. A line feed causes the next 
cell to be opened and displayed. A carriage return terminates the sequence. Note that the hexa- 
decimal conversion format is maintained over the ©and ©. 

BEGIN \ B MES+20© 

The user issues a command to open the cell at BEGIN and enters a branch to location MES+20, a 
patch area he has chosen that Is well beyond the main program and the FPT displayed above. 
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MES+20\ GAL1,1 MES+3 © 



He enters symbolic code for the MrWRITE instruction (as originally contained in BEGIN, displayed 
above). The line feed causes the next cell to be opened for modification. 

MES+.15\ CALl , 9 1 @ 

The next location prints with a hexadecimal displacement. He then enters symbolic code 
corresponding to an MrEXIT. He has now entered all his patches. 

BEGIN;G @ 

He initiates execution. 

GREETINGS 



EXIT AT MES+.15 

The output message prints, and Delta reports execution of the MrEXIT, stating the location of the 
M:EXIT (MES + . 15). 

The user interrupts with Y and then logs off. 
J_OFF © 
FINI 

The system informs him that Delta was terminated. 

- accounting summary - 



USING DELTA IN NONDEBUG MODE 

Delta may also be called for use when you have not initially executed in debug mode, i.e., you did not specify 
UNDER DELTA in your RUN or START command. The next example illustrates this type of usage. 

Note that only the global symbol table is available, and that the user's first Delta command must be ;S to cause 
this symbol table —associated with the load module as a whole — to be loaded. Otherwise, no symbols will be 
available for reference. (If rom;S is specified, as was possible in the preceding example, the global table is loaded 
implicitly.) 



Example 34. Calling Delta after Assembling and Executing in Nondebug Mode 


; 


The user wants to assemble lines from the terminal and to default all options. 


IMETA 


ME © 


WITH> 


© 


>^ 


SYSTEM SIG7 ® 


> 


SYSTEM BPM © 


> 


DEF START © 


>^ 


REF M:UC © 


>_START 


LI, 3 55© 


>^ 


MrSTIMER (SEC,5),XY© 


xAB 


LI, 4 © 


> 


STW,4 X © 
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> LW,4 X © 

> CI, 4 @ 

> BE $-2 @ 

> M:STIMER (SEC,5),XY © 

> M:WRITE M:UC , (BUF,MES) , (SIZE, 17)@ 

> BDR,3 AB @ 

> M:EXIT © 
>XY LI, 4 1 ® 

> STW,4 X @ 
>_ M:TRTN @ 
>.X RES 1 © 

>MES TEXT '5 -SEC INTERVAL' © 

> DATA.l X'15' @ 
>_ END START© 

^VNO UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL; 

* NO ERROR LINES 

mUN (NP)© 

LINKING $ 

He IniHates loading and execution of the program. 



5- 


■SEC 


INTERVAL 


5- 


-SEC 


INTERVAL 


5- 


-SEC 


INTERVAL 


5- 


-SEC 


INTERVAL 


5- 


-SEC 


INTERVAL 


5- 


-SEC 


INTERVAL 


5- 


-SEC 


INTlilRVAL 



The program output begins to print. 

The user notes that the program is looping more than was intended, and notices that an error was 
made in the first statement (he typed 55 instead of 5), and decides to interrupt with Y*^ and call 
Delta to enter a patch. (The system did not echo a left arrow since it was in output mode.) 

J_DELTA © 

Control goes to TEL, The user calls the Delta processor. 

DELTA HERE 



Delta identifies itself and prompts with a bell. 

;s © 

The user loads the global symbol table. The only symbol that can be referred to is START which is 
the only DEF in the program. 

START(X/ .22300037 .22300005 © 

He enters a Delta command to display the contents of START in hexadecimal format, and changes 
this value to the hexadecimal equivalent of LI, 3 5. 

START;G © 

He directs execution to the beginning of the program (location START). 
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5 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5- 


-SEC 


INTERVAL 


5 


-SEC 


INTERVAL 


5-SEC 


INTERVAL 



This time the program executes as was intended, 

EXIT AT START + .A 

Delta reports execution of the M:EXIT, i.e., normal termination. 



Y^^ 



_^OFF © 



CONTROL and Y interrupts Delta and returns control to TEL. 



The user logs off". 



- accounting summary 



USING DELTA TO WRITE PROGRAMS 

The user may write and check short Meta-Symbol or machine language programs using Delta. Example 35 illustrates 
the method by which this is done. In the example, a table TAB with ten numeric entries is created and a program is 
written to find the sum of the numbers and to store the result in location SUM. It would be helpful to review the 
commands: 



A 



and 



e(f<S>[K;) 
in Chapter 7 of the CP-V/TS Reference Manual, 90 09 07, before studying the example. 
Example 35. Using Delta to Write a Program 



J_DELTA @ 




















DELTA HERE 
.10000(X<TAB>K© 




















The user begins creating the 
(The range of addresses avai 


data for his 
able to the 


prog ra IT 
user is . 


by defining the 
AOOO - . IBFFF. 


global 

) 


symbol TAB at 


location 


.10000. 


TAB\5© 




















The page at . 10000 is 
opened. The user then 


obtained from the Monitor with the command TAB\, 
loads ten values into the table TAB, the first value 


Also, the 
being the 5 


cell at , 
above . 


10000 is 


TAB+.1\ 6 © 
TAB+.2\ 23 © 
TAB+.3\ 41 © 
TAB+.4\ 90 © 





















90 16 92D- 1(2/74) 
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TAB+.5\ -2© 
TAB+.6\ 57 © 
TAB+.7\ -34 ® 
TAB+.8\ 2© 
TAB+.9\ 588 © 
TAB+.A(1<SIM>K@ 

The global symbol SUM is defined at the next available location. 

TAB+.B(R<BEGIN>K @ 
BEGIN \ LI, 2 0© 

BEGIN+.1\ LI, 3 0@ 

The global symbol BEGIN is defined at the next available location and the first two instructions of the 
program are written. 

BEG IN+ . 2 ( R< RETURN>K @ 

RETURN AW, 3 TAB, 2© 

RETURN+.1\ AI,2 1© 

RETURN+.2\ CI, 2 10 © 

RETURN+.3\ BNE RETURN © 
RETURN+.4\ STW,3 SUM© 
RETURN+.5\ CALI,9 1@ 

The global symbol RETURN is defined at the next available location and the remaining instructions of 
the program are written. 

BEGIN;G © 

The user executes the program. 

EXIT AT RETURN+.5 

SUM/776 

The user obtains the answer by displaying the contents of SUM. 



FORTRAN DEBUGGING (FDP) 

The FORTRAN Debug Package provides a powerful conversational facility for convenient and rapid checkout of 
FORTRAN IV programs. The debugging features provided are dynamically controllable from the terminal at program- 
execution time, and include the following; 

Statement stepping. 

Conditional breakpoints. 

Data-change breakpoints. 

Execution-flow tracing and event-history recording. 

Display and modification of scalar and array-element values. 

Branching. 

Program restart. 

Statement skipping and deletion. 

Automatic calling-argument display. 
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You may refer 1o variables by name and to stafements by source-line number or stafement label. These references 
may be further qualified by subprogram name. 

The FDP facilify consists of a sublibrary of run-time subroutines (a portion of public library PO), plus the necessary 
symbol tables and in-line coding generated by the compiler when debug -mode is requested. (FDP can be used only 
when debug-mode compilation has been performed. ) Programs compiled in debug mode should not be used indis- 
criminately, as they require approximately 2.5 times the amount of memory required for nondebug runs and may 
even double normal execution times. 



In order to use FDP, you must do the following: 

1. Specify the DEBUG compilation option when FORT4 prompts for options. 

2. Specify in the RUN or LINK command either one of the library -search options (FDP or PO), or the clause 
UNDER FDP (the three forms are synonymous). 

The two examplesgiven here illustrate, in addition to TEL command usage, some of themore commonly used FDPcom- 
mands. Seethe FDP/Reference Manual, 90 16 77, for a complete description of the FDP commands, and a full explana- 
tion of their use. 

In the following example, the user compiles file INPUT, created in a previous example, in debug mode. Values 
for X, Y, and Z are read from file DATA (also created in the prior example). The ON debugging command causes 
values of D, X, Y, and Z to be displayed whenever D is computed. 

Example 36. Use of FDP ON and PRINT Commands 



j_fort4 input on , me © 

The user compiles file INPUTand directs the listing and compilation summary to the terminal. 

EXT. FORTRAN IV. VERSION COO 
OPTIONS >D EBUG , LS (g) 

Note the specification of DEBUG as an option,, 



1: 




WRITE (6,100) 


2: 


10 


READ (5,200) X,Y,Z 


3: 




IF (X) 20,50,20 


4: 


20 


D = SQRT(X**2+Y**2+Z**2) 


5: 




WRITE (6,300) X,Y,Z,D 


6: 




GO TO 10 


7: 


50 


STOP 


8: 


100 


FORMAT (7X,1HX,11X,1HY,11X,1HZ,11X,1HD) 


9: 


200 


FORMAT (3E11.3) 


10: 


300 


FORMAT (4( IX, Ell. 3)) 


11: 




END 



HEX 



DEC 



HEX 



DEC 



NAME TYPE CLASS 



LOG WORDS 



NAME TYPE CLASS 



LOG 



WORDS 



R SCALR 00003 V 



SQRT 



R SCALR 00000 V 



R SPROG INTRIN 
R SCALR 00001 V 



R SCALR 00002 V 



HEX 
LABEL LOG 

10 00008 



HEX 
LABEL LOG 



HEX 
LABEL LOG 



HEX 
LABEL LOG 



20 00017 



50 00036 



100 0003A 



200 00043 



300 00046 



LOCAL VARIABLES (4 WORDS) : 



00000 X 



00001 Y 



00002 Z 



00003 D 
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BLANK COMMON (0 WORDS) 



INTRINSIC SUBPROGRAMS USED: 



SQRT 



EXTERNAL SUBPROGRAMS REQUIRED: 



F:UF 


F:108 


M:DO 


M:0C 


M:SI 


9BCDREAD 


9 BCDWRIT 


9DBDCKIN 


9DBFHG0 


9DBFHIF 


9DBINIT 


9DBSCKIN 



9ENDI0L 9I0DATA 9 SQRT 9 STOP 

HIGHEST ERROR SEVERITY; (NO ERRORS) 

DEC HEX 

WORDS WORDS 



GENERATED CODE: 


119 


00077 


CONSTANTS : 





00000 


LOCAL VARIABLES: 


4 


00004 


TEMPS: 


4 


00004 


TOTAL PROGRAM: 


127 


000 7F 



The program listing and compilation summary is printed. 

XSET F:6 /VECTORS; OUT @ 

The user directs the program output to file VECTORS. 

J.SET F:5 /DATA; IN @ 

Program input will be read from file DATA. 

IRUN (FDP) @ 

The user loads and executes in the debug mode. Alternatively he could have specified: 



i,RUN UNDER FDP or 
IRUN (PO) 



LINKING $ 

The loader's message prints. 

@0N D;PRINT X,Y,Z @ 

FDP prompts with @. The user enters commands to cause the value for D to be displayed each time It 
Is stored into, and at the same time to display values for X, Y, and Z. 

@G0 @ 

The user does not want to enter any more debug commands at this point and issues a GO command to 
start execution. 

/4(20S): 0=3.74166 X=l. 00000 

Y=2.00000 

Z=3. 00000 
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4(20S); D=l. 73205 X=l. 00000 
Y=l. 00000 
Z=l. 00000 

Values for D, X^ Y, and Z are displayed. The slash (/) indicates main program and is followed 
by line number and statement number (if present) in parentheses. 

-STOP^''' 

This message is produced by the library subroutine STOP. 

7 (SOS); RDY TO STOP 

This message is produced by the debugger. 
@QUIT © 

The QUIT command causes return to the monitor, 

lOFF © 

- accounting summary - 



In the next example, the user enters a FORTRAN source program from the terminal without initializing variables, 
setting loop control, and providing for I/O. He runs in the debug mode and issues FDP commands to provide the 
omitted functions. 

This program generates a Fibonacci sequence, in which the value of any number (beyond the second) in the sequence 
is equal to the sum of the values of the two preceding numbers, e, g, , 1, 1, 2, 3, 5, 8, 13, 21,34,55, .... 



Example 37. Further Uses of FDP Commands 


j_F0RT4 ME ON , LP© 


OPTIONS > DEBUG © 


>10 I==I+J © 


>^20 J-I+J © 


>30 GO TO 10 © 


>40 END © 


HIGHEST ERROR SEVERITY: (NO ERRORS) 


j_RUN UNDER FDP © 


This command causes the user's program to be loaded and executed, with public library FDPassociated, 


LINKING $ 


@I=0 © 


@J=1© 


FDP prompts with @, The user initializes I and J, 


@0N I © 


@0N J © 


These ON commandswill cause values for land J to be displayed when these variables are stored into. 
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£STOP AT 3#5 @ 

This command causes execution to halt the fifth time that statement 3 (the GO TO statement) is encountered. 
£G0 @ 

Execution is now begun with the above commands in effect. 



/KIOS): 


1=1 


2(20S): 


J=2 


I(IOS): 


1=3 


2(20S): 


J=5 


I(IOS): 


1=8 


2(20S): 


J=13 


I(IOS): 


1=21 


2(20S): 


J=34 


I(IOS): 


1=55 


2(20S): 


J=89 



Values for I and J are displayed. The slash (/) indicates main program and is followed by line 
number and statement number (in parentheses). 

3(30S): 

The program halts the fifth time that statement 3 is reached. 
@KILL © 

FDP prompts for a command. This KILL cancels all previous FDP commands. 
@STOP ON I>500 © 

A conditional stop, or breakpoint, is set. 
@AT 3; PRINT I,J ® 

These commands will cause values of I and J to print each time statement 3 is reached. 
@RE START @ 

This specifies restart of program from beginning. 
@G0@ 

The user resumes execution, 

/3(30S) ; 1=144 
J=233 

3(30S); 1=377 
J=610 

Values for I and J are displayed each time statement 3 is reached. 
I(IOS); 1=987 

At statement 1, the value for I exceeds 500 and the program halts. 
@KILL ON I @ 

This command cancels the last ON I, effectively the last STOP command issued. 

@STOP ON J>10000 @ 

Another conditional stop is issued. 
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@G0 © 

Execution is resumed at statement 3, which is where the previous stop occurred. 



/3(30S) 


: 1=987 


J=1597 
3(30S): 


1=2584 


J=4181 
2(20S): 


J=10946 



Values for I and J print until J exceeds 10000 which occurs at statement 2. 

@PRINT I @ 
6765 

Since statement 3 was not reached to cause the current value for I to be displayed, the user gives 
a PRINT command to cause this value to print. 

@QUIT © 

The user now leaves FDP and returns to TEL, 

lOFF @ 

- accounting summary ~ 
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8. EXECUTING USER PROGRAMS 



An object program stored on a file in load-module form may be called by its load-module name (Imn) used as a TEL 
command verb. The load-module file may be stored either in your own account, someone else's account, or the 
system account. Thus far, the Imn-as-verb command is synonymous to the ISTART Imn command (except for a dif- 
ference in account-number defaults). Within the !lmn command, however, you can also very conveniently make 
file or device assignments for three standard system DCBs: M:SI, M:GO, and M:LO. 

The format of the variable field of the command is analogous to that of the FORT4 and META commands; the full 
format is 

limn ['"Put][Qyg[^ [output ^][,output2]J 

where 

Imn is the fid of an LM that can take the full form: 

name . [account] [.password] 

(see below for special defaults) 
input may be a fid or ME to be assigned to the input DCB M:SI. 

output^ may be a fid to be assigned to the output DCB M:GO. 

output- may be a fid, ME, or LP to be assigned to the output DCB M:LO. 

(Normal default assignments apply. That is, the M:SI and M:LO DCBs, if referenced, default to the user's terminal, 
and M:GO to a temporary file named $. ) 

The called program must, of course, directly or indirectly utilize one or more of the above-mentioned DCBs for any 
of these assignments to make sense. 

You can imply or specify the account number under which the LM file is stored, and specify a password, as follows: 

1. filename — (alone, with no period) implies the system account. 

2. filename, —implies your account (i.e., the log-on account value). 

3. filename.account —specifies an account .lumber. 

4. filename.account. password —specifies an account number and password. 

5. filename, .password — implies your account and a password. 

Note that this particular convention of default account number values is not the standard one that applies to most 
fid specification in TEL and other commands, as described in Appendix B. The reason for the system account de- 
fault in particular is that installations may want to include, at system generation time, certain user-developed 
"production" programs in the system account; special forms of these may then be accorded preferential disk -storage 
and loading, depending upon frequency of use and programming characteristics. (META and FORT4 commands, for 
example, are actually special instances of limn commands.) 

The two examples following show very simple programs, developed wholly within the example for purposes of illus- 
tration. Actual uses of the command may, of course, call a program developed some time in the past, and possibly 
by another programmer. 

The program in Example 38 reads a Meta-Symbol source program via M:SI, and writes out any comment lines (asterisk 
in column 1) contained in the program via M:LO. The input file and output device are assigned within the calling 
command. As a test, the user specifies as input th^, source program from which the called object-program was assembled. 

Example 39 merely shows a simple FORTRAN IV program call by its load-module name. Since the compiler automati- 
cally provides (indirectly) program-file DCBs identified with names of the form F:n, file/device assignments cannot 
also be made within the !lmn command for FORTRAN object programs. 
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Example 38. Using Load-Module-Name as Command Verb (Meta-Symbol Program) 



!EDIT © 
EDIT HERE 
*TA M© 



The user sets tabs for META. Then he builds a Meta-Symbol Program to extract comments lines from 
Meta-Symbol source programs. (Usage of tab control not shown.) 



* BUILD SOURCE © 
1.000 * 



***UTILITY PROGRAM "EXTRACT"*** © 
THIS ROUTINE LISTS ONLY THE COMMENTS LINES, IF ANY, FROM© 
A META SOURCE -PROGRAM FILE. IT ISSUES A BLANK© 
LINE TO INDICATE ONE OR MORE CODING LINES© 
INTERVENING BETWEEN COMMENTS. IT READS ITS INPUT© 
FROM M:SI, AND WRITES TO M:LO.© 
SYSTEM BPM © 
SYSTEM SIG7© 
REF M:SI,M:LO© 

***INPUT BUFFER*** © 

RES 20 © 

***80 BIu^KS***© 
13.000 BMNKS EQU $© 

14.000 DOl 20 © 

15.000 TEXT • • © 

16.000 * WE GIVE A TOP-OF-PAGE AT BEGINNING (AND END) © 
17.000 START MtDEVICE M:LO,(PAGE) 

18.000 * SWITCH: "HAVE WE ISSUED A BLANK LINE ?" : = YES/l = NO© 



2.000 * 
3.000 * 
4.000 * 
5.000 * 
6.000 * 
7.000 
8.000 
9 .000 
10.000 * 
11.000 INN 
12.000 * 



19.000 

20.000 R I)NXT( 
21.000 
22.000 
23.000 



=0 



24.000 
25.000 
26.000 
27.000 * 
28.000 * 
29.000 
30.000 
31.000 * 



32.000 * 
33.000 PRINT 
34.000 



LW,4 

M:REA.D 

LB, 5 

CI, 5 

BE 

CI, 4 

BE 

M:WRITE 
WE SET THE SWITCH 
COMMENT" 

LI, 4 

B RDNXT 
WE RESET THE SWITCH: 
LAST COMMENT" 



M:SI,(BUF, INN), (SIZE, 80), (ABN, EXIT) 

INN 

•*' 

PRINT 



RDNXT 

M:LO,(BUF, BLANKS), (SIZE, 72) 

"BLANK LINE ISSUED SINCE LAST 



"BLANK LINE NOT ISSUED SINCE THE 



35.000 
36.000 
37.000 
38.000 E XIT 
39.000 



LI, 4 
LW,1 
SLS,1 
M: WRITE 
B 



40.000 
41.000 



M:SI+4 

-17 

M:LO,(BUF, INN), (SIZE, *1) 

RDNXT 
M :DEV ICE M : LO , ( PAGE ) 
M:CLOSE M:LO,(SAVE) 
M:EXIT 
END START 



^META SOURCE© 
WITH> © 

* NO UNDEFINED SYMBOL S 

* ERROR SEVERITY LEVEL: 

* NO ERROR LINES 

ILINK (NP) ON EXTRACT © 
LINKING $ 
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ICOPY SOURCE TO SORCNC(NC) © 
. .COPYING 

The user copies the source file using the NC option to strip the carriage -return off each records- 
otherwise the output below would be double spaced. 

^EXTRACT. SORCNC ON ,ME © 

Here he calls the LM EXTRACT, with a following period to indicate "my account", and assigns the 
input file, SORCNC, and directs M:LO output to the terminal. 

* ^^'"VUTILITY PROGRAM "EXTRACT"^'"'fV^ 



-'' THIS ROUTINE LISTS ONLY THE COMMENTS LINES, IF ANY, FROM 

* A META SOURCE -PROGRAM FILE . IT ISSUES A BLANK 

* LINE TO INDICATE ONE OR MORE CODING LINES 

* INTERVENING BETWEEN COMMENTS. IT READS ITS INPUT 



* FROM M;SI. AND WRITES TO M;LO. 
* ^'o'nV INPUT BUFFER*^'"'? 

* >w«V80 BLANKS*** 



WE GIVE A TOP -OF -PAGE AT BEGINNING (AND END) 

SWITCH: "HAVE WE ISSUED A BLANK LINE ?"; = YES/l = NO 

WE SET THE SWITCH; "BLANK LINE ISSUED SINGE LAST 
COMMENT" 



* WE RESET THE SWITCH; "BLANK LINE NOT ISSUED SINCE THE 

* LAST COMMENT" 

The program's output has printed and control reverts to TEL. 



Example 39. Usinc 


J Load-Module-Name as Command Verb (FORTRAN Program) 


-page heading- 




ITABS 7© 




The user sets a tab stop for terminal input. 


IBUILD FILEl© 




1.000 ^ 


1=1© 


2.000 ^ 


WRITE (6,20)@ 


3.000 f^ 


DO 10 J=l,10© 


4.000 ^ 


1=1*3© 


5.000 10@ 


WRITE (6,30) I© 


6.000 20© 


FORMAT (1X,15HP0WERS OF THREE)© 


7.000 30©' 


FORMAT (5X,I7)© 


8.000 (MB) 


END© 


9.000 (^ 




! COMMENT ON ME 


© 
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1F0RT4 FILEl ON OUTFIUi;© 

FORT4 is called to compile source program FILEl, with ROM output going to OUTFILE. 
EXT. FORTRAN IV, VERSION C02 
OPTIONS>NS@ 

FORT4 prompts for options. The user suppresses the partial -summary output. 

ISET F:6 UG ® 

This command will cause output to device 6 to be directed to the terminal. 

ILINK OUTFILE ON P0W3 @ 

Call LINK to create load module POW3, 
LINKING OUTFILE 

The LINK processor responds. 

PI ASSOCIATED 
J_P0W3 . ® 

Load module POW3 is loaded into core and executed. The log-on account is used. 
POWERS OF THREE 



27 



243 



729 



2187 



6561 



19683 



59049 



*STOP* 



The program's output is printed. 
j_OFF@ 
-accounting summary- 
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9. GETTING IN AND OUT OF PROCESSORS 
GENERAL 

Once having logged on, you are always in one of fhree sfates of processing: 

1 . In a Job Sfep: You are In a sysfem (or user) processor, i.e., in "normal" user-program execufion. 

2. In an Interrupt" of a Sfep: You are at TEL level but have an interrupted processor associated. 

3. Between Steps: You are at TEL level with no processor associated. 

If you are in a processor, you can return control to TEL by depressing certain terminal keys (discussed shortly). Cer- 
tain TEL commands can then be issued to perform minor operations after which control can be returned to the proces- 
sor that was interrupted. The issuance of other TEL commands will cause either an abort of the previous job step or 
a diagnostic message. For example, interrupting META to issue a DONT COMMENT command does not cause an 
abort and allows return of control to META; interrupting META to call Edit will result in an abort of META; inter- 
rupting META to issue a SET command will result in the message "QUIT?", at which point the user may choose be- 
tween quitting or continuing the META processor. A complete description of the TEL commands and their effect 
when used during a job step interrupt is given in Chapter 3 of the CP-V/TS Reference Manual, 90 09 07. 

BREAK, CONTROL Y, ESC Y, AND ESC ESC 

Any CP-V processor or user's object program can be interrupted by depressing the BREAK key. Use of the BREAK 
causes one of the following to occur: 

1 . If you are in a processor that has no command language (e.g., assembling with META), control is given to 
TEL whenever a convenient interrupt point is reached. TEL then prompts for a command. 

2. If you are in communication with a processor that has break control (e.g.. Edit, BASIC), and in a sub- 
process such as listing or copying, control is given to the processor, which prompts for its next command 
or possibly issues an interrupt message. 

3. If an object program or processor is in a process that does not have break ontrol (i.e., has not used the 
M:INT Monitor service) control is given to TEL. 

The CONTROL Y combination or the ESC Y or ESC ESC sequences always return control to TEL. This type of inter- 
rupt can also be caused by depressing the BREAK kev more than three times. (Certain processors may take special 
action on receipt of two or three break signals.) Examples of interrupting a processor are given in Example 40. 

Example 40. Using CONTROL Y and the BREAK Key 



1_EDIT FILES ® 


EDIT HERE 


The user decides to make changes to FILES. 


*IN 7,1@ 

7.000 Y^^ 


He starts to modify the file but changes his mind and interrupts by hitting CONTROL and Y simulta- 
neously. The system echoes a left arrow. 


ypcL@ 


Control returns to TEL. The user calls PCL. 
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PCL BOO HERE 

PCI. identifies itself. 

<LIST© 

The user asks to have the names of the files that are currently in his disk directory listed. 

ARC SINE 

CONWAY 

DATA 

FILES 

INPUT 

(W) 



5 FILES LISTED 



He does not want to see the entire list, so he hits BREAK to stop the output. 



<COPY FILES TO LP@ 



Return is made to the command state of PCL. The user issues a COPY command to copy file 
FILES to the line printer. 

<END@ 

He leaves PCL. 

_!_EDIT FILES @ 
EDIT HERE 
*TYl-7@ 

He calls Edit and issues commands to type lines in file FILES. 

1.000 * THIS PROGRAM SEARCHES NAME /ADDRESS -RECORD FILES ORDERED BY 

2.000 * ZIP-CODE LOCALITIES. IT ALSO INSERTS AND DELETES N/A RECORDS. THE 

3.000 * CALLING SEQ @ @ @ © _j- 

He does not want to see the entire file, so he returns to TEL by hitting BREAK four times. He 
could also have returned to TEL by depressing CONTROL and Y or © (g) . 

--ENTER X TO ABORT COMMAND. ANY OTHER CHARACTER CONTINUES. 



The Edit processor has break control and types this message in response to the first break. The 
subsequent breaks cause direct return to TEL. 

i_OFF @ 
- accounting summary- 
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QUIT AND CONTINUE COMMANDS 

After you have interrupted a processor and have optionally issued one or more commands, you have three alternative 
courses of action if the interrupted processor has not been aborted during the interrupt: 

1. Return to the interrupted processor by issuing a CONTINUE command. 

2. Discontinue use of the current processor by issuing a QUIT command. 

3. Call another processor, which has the effect of aborting the previous operation. 
Each of these actions is illustrated in the following example. 

Note that both END and STOP are equivalent to QUIT, and that GO is equivalent to CONTINUE. 

Example 41 . Interrupting, Continuing, and Quitting Execution 



XBUILD INPUT © 
1.000 SYSTEM y'^:*: 

The user wishes to build file INPUT but forgot to set tab stops before building the file. So he 
now interrupts Edit by simultaneously depressing CONTROL and Y which the system echoes as 
a left arrow. Control is given to TEL. 

J.TABS 10,19,37 @ 

He now sets tab stops for the terminal I/O. 

^CONTINUE @ 

He issues a CONTINUE command which takes him back to Edit (with no prompt). He retypes 
his first line, since he interrupted while typing this line. 

© SYSTEM© SIG7 @ 

2.000 © SYSTEM © BPM © 

3.000 START©M:PRINT © (MESS.MES) © 

4.000 © M:EXIT @ 

5.000 MES© TEXT© 'MESSAGE TO TERMINAL'® 

6.000 © END © START @ 

7.000 @ 

IMETA INPUT ON BOFILE.LP© 

WITH > © 

c 

Y ± 

He calls META to assemble the program, but then spots an error in the program and interrupts 
with Y*^. 

j_EDIT @ 

He calls Edit to correct the error. META is automatically aborted. 

EDIT HERE 
*EDIT INPUT® 

He wants to retype line 5 to change TEXT to TEXTC. 
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He issues an insert command (IN) to correct the line. (Note that a space is not required between 
the command and the line number.) 

5.000 M ESf^ TEXTC© 'MESSAGE TO TERMINAL'® 

*END© 

imTA INPUT OVER BOFILE,LIST@ 
WITH>@ 

He again calls META to assemble file INPUT and request an output listing. Note use of 
OVER to reset file extension, ensuring that any output from the previous aborted assembly 
is overwritten. 

*N0 UNDEFINED SYMBOLS 



* ERROR SEVERITY LEVEL :0 
*nO ERROR LINES 
_[LINK (NP) BOFILE ON MES © 



LINK is called to create load module MES. 

LINKING BOFILE 



_!_EDIT INPUT © 



EDIT HERE 



*TYl-6© 



He now wishes to see the corrected source and calls Edit to display the file. (Note that a space 
is not required between the command and the line number.) 



1.000 SYSTEM SIG7 

2.000 SYSTEM BPM 

c 

Y ± 

He decides he does not want to see the entire file after all, so he simultaneously depresses 
CONTROL and Y to interrupt Edit and return control to TEL. The system did not echo a left 
arrow since it was in the output mode. 

_LQUIT © 

He then issues a QUIT command so that use of the Edit processor will be discontinued. 

_!_NES.© 

He now wants to load and execute program MES (but misspells the program name). 

y"± 

He realizes that MES is misspelled and that NES (which happens to be another valid program 
name) is now operating, so he returns control to TEL and types in the correct name. 



QUIT and CONTINUE Commands 79 



_!_MES.@ 
QUIT? 



1@ 



The system informs him that the program cannot be loaded without quitting the previous process 
(NES), and that he must issue either a QUIT or a CONTINUE command. An implied QUIT may 
be issued by entering a RETURN or LINE FEED character by itself. (This message would not have 
appeared had the user preceded the MES. command with a QUIT command.) 



The implied QUIT command causes the processor previously specified (MES) to be loaded and 
executed. 



MESSAGE TO TERMINAL 

The program output prints. 
_!_OFF@ 
- accounting summary - 



PROGRAM ABORTS 

Many conditions can cause your program to be aborted, e. g. , an invalid operation code. When an abort occurs, 
the system prints an abnormal or error code (e. g. , 4A00) followed by a message telling you the reason for the abort. 
The CP-V/TS Reference Manual, 90 09 07, Appendix B, contains listings and explanations of the Monitor error 
messages . 

The following example shows a program that will simply read two records of predetermined size from a file and print 
them at the terminal. However, a misspelled label in line 8 (BUF instead of BUFF —not a syntax error) causes an 
attempt at execution time to read into relative location 12. Since this location is in a write-protected procedure 
area of the program (i, e. , the area cannot be stored into), the program is aborted and an appropriate message issued 
by the system, (Note that the program in this example is not intended to be realistic, but is designed solely to 
illustrate as simply as possible the "bug", and thereby the point of the example. ) 



Example 42. System Handling of an Abort during Execution 



2.BUILD READ® 

The user builds files READ and LINES (following line 14), 



1.000 


- 


SYSTEM 


SIG7 @ 






2.000 


_ 


SYSTEM 


BPM © 






3.000 


. 


REF 


M:SI © 






4.000 


_ 


REF 


M:UC @ 






5.000 


BUF 


EQU 


10 @ 






6.000 


_START 


MrREAD 


M: SI, (BUF, BUFF) 


(SIZE 


16)0 


7.000 




MrWRITE 


M:UC,( BUF, BUFF) 


(SIZE 


17)@ 
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8.000 

9.000 
10.000 
11.000 BUFF 



12.000 
13.000 



MrREAD 

M:WRITE 

MrEXIT @ 

RES 

DATA^l 

END 



M:SI,(BUF,BUF+2),(SIZE,8) @ 
M:UC,(BUF,BUFF+2),(SIZE,9)© 

4 © 
X'15'® 
START ® 



14.000 © 
_!_BUILD LINES @ 

1.000 HELLO, TERMINAL! © 

2.000 GOODBYE! @ 

3.000 © 
^COMMENT ON ME © 
_!_META READ © 
WITH > © 

**** ILLEGAL BUF/PARAM-RETURN ADDRESS 

* NO UND E FINED SYMBOLS 

* ERR O R SEVERITY LEVEL; 3 
* ERROR LINES 



He calls META to assemble the source file. META produces summary messages indicating that there 
was an assembly error. However, the user decides to run the program anyway. 

^SET M:SI DC /LINES; IN© 

He sets M:SI to the input file. 

2.RUN (NP)© 

LINKING$ 
HELLO, TERMINAL! 

The first record is written. 
4A00 SPECIFIED BUFFER DOES NOT BELONG TO THE USER 



The system returns an abort message with an error code when the user tries to read the second record 
into location 12, which is in a protected area. 
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10. ASSIGNING OCBs 



DATA CONTROL BLOCKS 

A data control block (DCB) is a standardized table of information about the characteristics of an existent data-file 
or one to be created. The system's file-management service routines use the DCBs essentially to obtain detailed 
information both about the file, (i.e., the data) and the physical storage media assigned to it. This, combined 
with information supplied in a given service request, completely defines the requested operation. These routines 
also use the DCB to post or update dynamically-variable "historical" information concerning the data file (specific 
results of the last I/O operation performed, for example) to v/hich the user's program and other system routines may 
refer. 

The DCB also is, effectively, the connecting link between the user's input/output service requests, file-management 
commands, etc, and the actual disk storage space or peripheral device from which or on which a given data file 
is to be read, written, copied, saved, deleted, and so on. Sometimes the reference to this "link" is explicit at 
the user's level, as for example in an M:READ or M:WRITE Monitor procedure in a Meta-Symbol program, or in a 
SET command when the user needs to assign or reassign program input or output DCBs to specific disk files or devices. 

MEANS OF FILE/DEVICE ASSIGNMENT 

The !SET command may be used to explicitly assign any DCB (excepting M:UC, M:OC, and M:XX) to a file or 
device, as seen in a number of preceding examples, (SET can also be used for setting and resetting various param- 
eters, or relatively fixed items of information in a DCB, e, g, , file options, but a general discussion of this usage 
does not concern us here, ) 

The lOUTPUT, !LIST, and ICOMMENT commands can be used to implicitly assign several standard system DCBs 
commonly used by system processors: M:GO, M: LO, and M:DO, respectively. Usage of these commands was also 
shown and described for specific cases in preceding chapters. And, summarizing topics covered in Chapters 5 
and 8, the source, rom, and list parameters of MET A, FORT4, and Im-name commands implicitly assign the M:SI, 
M:GO, and M: LO DCBs. 

In general, the SET command need only be used to assign user-program files for DCBs that have no default assign- 
ment (or an undesired one), or to assign standard system DCBs, other than the ones named above, for special-option 
processor outputs, e. g. , the CO, BO, and SO options and the corresponding M.v-O, M:BO, and M:SO DCBs, To 
assign M:SI, M:GO, M:LO, and M:DO, the choice between the several means described above is simply a matter 
of the user's convenience, as they each "do the same job", excepting that SET cannot be used in a Job-step inter- 
ruption, (See SET Command below, for specific information concerning BASIC, ) 



STANDARD SYSTEM DCBs 

The system Includes an extensive set of standard DCBs that provide for the majority of system- and user-program 
needs. The link-loader supplies a uniform loader-constructed copy of these DCBs to the user's program as required 
to satisfy references thereto. These DCBs all have names of the form M:xy, where xy generally corresponds to a 
system-defined operational label (discussed under SET Command below). These DCBs, v/hen used on-line, have the 
on-line default assignment (If any) defined by the system for the corresponding operational label. Note that the 
default assignments for M:UC and M:OC, the user's terminal in both cases, are really fixed assignments, I. e, , you 
cannot change them, (The default assignments can vary with individual installations, and most of them differ for 
batch operations, ) 

Although a number of system DCBs default to the user's terminal, the M: UC DCB Is unique because (1) its fixed 
assignment Is to the terminal — like M:OC, and (2) output through It Is treated differently by the Monitor than out- 
put to the terminal via any other DCB — unlike M:OC, For terminal output via any DCB other than M:UC, the 
Monitor's CC)C (Character-Oriented Communications) routines automatically append a carrlage-return/line-feed 
combination to each record written without a tei ninating carriage return. The COC routines do not append 
such a combination to output written via M:UC; It will substitute that character combination, however, for any 
carriage-return or line-feed character In the record. This difference allows you, when using M:UC, to produce one 
physical line at the terminal with a series of records. (See CP-V/TS Reference Manual, 90 09 07, Chapter 10, 
for details.) 
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In addition to the standard system DCBs, the link-loaclsr will supply a uniform loader -constructed DCBfor onyMrab 
DCB reference where M:ab is not known to the system, and for any DCB reference of the form F:ab, such as pro- 
duced by FORTRAN IV for program files, where ab corresponds to the FORTRAN unit number. In these cases, the 
DCBs neither have a default assignment nor are they automatically defined for input or output —excepting F:101 
through F:108, the FORTRAN standard units. They are also not defined for final disposition, and an I/O function 
and disposition parameter (e.g., IN, SAVE) may need to be set.as well if the assignment is to a file or labeled tape. 
(These settings are described below.) 

ASSIGN/MERGE TABLE 

DCB assignments, excepting those for M:SI, automatically remain in effect across job steps until reset or negated. 
Assignments can be reset or negated between Job steps. The mechanism for setting and resetting assignments is the 
assign/merge table, during an on-line session. An M:SI assignment is effective only for a single job step; following 
that step it always reverts to its default assignment, the user's terminal. 

Any assignment made by any of the means described above causes an entry to be made in your assign/merge table. 
At the beginning of any job step involving a processor (including LINK) or a user's program, the entries in the 
assign/merge table are merged into the corresponding DCBs. (An entry in the table is deleted by a ISET deb 0.) 

If an error occurs when accessing the ASSIGN/MERGE record, the user will be logged off. He must log back into the 
system to continue. 

The apparent negation of an assignment achieved specifically by means of a DONT. . . command, e.g., DONT LIST, 
bypasses the ossign/merge table and affects only a switch in the user's JIT (job information table)at the time the com- 
mand is issued, whether between job steps or during a job-step interruption. (The implied DCB is notaffected.) Only 
the standard processor outputs written via M:GO (OUTPUT), M:LO (LIST, and M:DO (COMMENT) DCBs can be 
affected in this way. 

OUTPUT, LIST,AND COMMENT COMMANDS 

Control over output from META, or FORT4, or a standardized user-processor may be exercised with the following 
commands before the processor command is issued: 

• OUTPUT ON or OUTPUT OVER followed by a file name. This command specifies the destination of the 
relocatable-object output (ROM) from the processor via the M:GO DCB. M:GO defaults to a special 
file, which you may refer to in some cases with a dollar sign ($). 

• LIST ON or LIST OVER followed by ME, LP, or file names. This command specifies the destination of the 
listing output from the processor, via the M: LO DCB. For META and FORT4, M: LO effectively has no 
default assignment. Either an explicit assignment must be made or the ! LIST command given to turn on the 
LO-output switch in the user's JIT. Apart from META and FORT4, M:LO defaults to the terminal, 

• COMMENT ON or COMMENT OVER followed by ME, LP, or file name. This command specifies the 
destination of error commentary from the processor, via the M:DO DCB. M:DO defaults to the user's 
terminal. Therefore, COMMENT need not be used unless you want to direct error commentary to a 
destination other than your terminal. 

In the following example, we specify destination files for the META output by using the LIST and OUTPUT com- 
mands, and (for purposes of Illustration only) turn off the diagnostic output. We then assemble and execute the 
subprogram, but trap. We do not detect any errors in the source program, so in order to find out if we have as- 
sembly errors (which do show on the listing, however) we Issue a COMMENT command to turn error commentary back 
on. We reassemble, find that we have a syntax error, and correct the line before reassembling again. 



Example 43. Controlling the Destination of Processor Output 



_!_BUILD COUNTER @ 

1.000 SYSTEM SIG7 @ 

2.000 SYSTEM BPM © 

3.000 BEG LI,1 100© 
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4.000 STW 1,X © 

5.000 M:EXIT© 

6.000 X RES 1 © 

7.000 END BEG © 
8.000 © 

jLIST ON LOFILE © 

Before calling META, the user directs listing output to file LOFILE, 

_!_OUTPUT ON BIN© 

He specifies that the ROM output is to go to file BIN. 

IDONT COMMENT © 

He overconfidently turns off error commentary, 

j_META COUNTER © 

WITH> © 

IRUN BIN ON CNTRIOO© 

He requests load module output on file CNTRIOO, 

LINKING BIN 

DEFAULT CORE LIBRARY IS NOT NEEDED 

A400 YOU TRAPPED 

An abort message prints indicating the program would not execute properly. 

_!_G0MMENT © 

The user does not spot any errors in the source, so he issues a COMMENT command to cause 
error commentary from META to appear of the terminal, 

IMETA COUNTER OVER BIN, LOFILE© 

WITH> © 

He calls META again. Files BIN and LOFILE were created when META was previously called, 
so they must be respecified in order to be recreated or written over, rather than extended. This 
time the error commentary prints at the terminal and indicates that statement 4 is in error, 

4 01 0000 1 35060001 N STW 1,X 

4.000 

>w»v>v ILLEGAL CF 

* NO UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL: 3 



-'' ERROR LINES 

4 

_!_EDIT COUNTER© 
EDIT HERE 
*IN 4© 

He wants to change line 4 and uses the Insert (IN) command to enter a corrected statement, 
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4.000 STW.l X @ 

*END @ 

IMETA COUNTER OVER BIN.LOFILE @ 

WITH> © 

He calls META again. Error commentary will still be directed to the terminal, since the previous 
COMMENT command is still in effect. 

*N0 UNDEFINED SYMBOLS 

* ERROR SEVERITY LEVEL; 

* NO ERROR LINES 

IRUN (NP) BIN OVER CNTRIOO © 
LINKING BIN 

Since there are i^o errors in the assembly, he reloads and reexecutes the program, to recheck and 
get an updated load module. 

Normal execution is indicated by ci return to TEL with no message. 

J.OFF ® 

- accounting summary - 



SET COMMAND 

The general form of the I SET command is given in the CP-VAS Reference Manual, 90 09 07, with descriptions of 
its many options and varied examples of its use. It is a complex command. Several forms, selected for particular 
uses, are as follows: 

• To Assign a public disk File 

SET deb /fid[;filopt, . . ;filopt] 

where 

fSlopt is one of the file-option parameters given in Appendix C, Table C-3. Some of these are 



function 



rfsHAREn 

^'^llEXCl. JJ 


— input file 


OUT 


— output file 


^NouT[,{,^;;^f}; 


— update file 


OUTIN 


— scratch file 


REL 


— release on close 


SAVE 


~ save on close 



disposition 

The defaults for the function and disposition parameters are interrelated, as follows: for IN or INOUT 

files, SAVE is the default; for OUT or OUTIN files, REL Is the default. (Note that for an OUT or OUTIN 
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file the SAVE parameter does not actuolly cause the file to be permanently saved, but merely allows 
SAVE to be effectively specified in an M:CLOSE operation.) 

To Assign a Labeled-Tape File or Private Disk Pack 

SET deb dc[#nnnn][-rt]/fid[;filopt]. . . 

where 

dc is a device code: DP-disk pack; LT-Xerox labeled tape; AT-ANS labeled tape; FT-free form 

tape. 

*nnnn is a tape or disk pack serial number (i.e., an internal reel number). 

rt is the 2-character identifier of a device that was defined at SYSGEN to be a resource. 

fid is the file identification of a file on the tape or pack. 

filopt is as above, under disk file assignment. 

Note that the disposition file options, SAVE and REL, have specialized meanings for tape operations, as 
described in the CP-V/BP Reference Manual, 90 17 64. 

To Assign a Peripheral Device (Other Than Magnetic Tape or Private Disk Pack) 
dev 



SET deb 



stream -id 
oplb 



Ijdevopt]. . . 



where 

dev is a symbiont-output device code (e.g., LP - line printer, CP - card punch). 

stream-id is the name of a logical device stream (e.g., LI, PI, CI). 

oplb is a system-defined operational label. These are given in Appendix C, Table C-1 (see 

also below). 

devopt is a device-dependent device option; these are given in Appendix C, Table C-2, and 

mainly concern format control and read/write codes and modes. 



The system-default value of an operational label, e.g., SI, LO, or CO, is set by the individual installa- 
tion, and normally will differ from on-line to batch mode. In CP-V as distributed, the following opera- 
tional labels and correspondingly named DCBs default on-line to the user's terminal: C, DO, EI, LL, LO, 
OC, SI, SL, and UC. Excepting the special label NO, all other operational labels have no "as-directed" 
default value. The operational label NO has the fixed meaning "no assignment", and while it is in force, 
effectively prevents any default assignment from being applied. This causes any output via a so-assigned 
DCS to be lost, and an immediate end-of-file return on input. 

• To Clear a User-Set Assignment 

SET dcb[0] 

This form causes any prior assign/merge table entry for the named DCS to be deleted from the table. Thus, 
any system-default assignments are allowed to take effect in subsequent job steps. 



• To Clear All User-Set Assignments 

r[eset] 

This form deletes oil previously assigned entries from the assign/merge table. All system default assign- 
ments for oil standard system DCBs are in effect for subsequent steps. 
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GENERAL USAGE RULES 

The following usage rules apply In general: 

1 . File or device options can be added or respecified, between job steps, for an already assigned DCB if the 
assignment was made by a previous SET, OUTPUT, LIST, or COMMENT command, or a processor -call 
parameter. 

2. As stated earlier in this chapter, when assigning a file to any nonsystem -defined, loader-constructed DCB 
(excluding FrlOl, F:102, . . ,F:106 for FORTRAN standard units) you must also specify one of the file- 
option function parameters (IN, OUT, INOUT, OUTIN), and also the disposition parameter unless the 
default is desired. Thus, an output-file assignment for, say, FORTRAN unit 6 would be as follows: 

I SET F:6 /OUTI-IL;OUT;SAVE 



Example 44. Setting DCB Assignments and Parameters with the SET Command 



This example illustrates use of the SET command to direct input to and output from an assembly. The user 
obtains source output on tape, a compressed-output deck, a double-spaced output listing on the printer, and 
ROM output on a disk file. 



ISET M:SO LT#A123-9T/Z@ 

This command will cause the source output from META to go to file Z on the 9-track magnetic tape 
having the serial number A 123. 

j_SET M:LO L0;SPACE=2 ® 

The user wants the output listing double-spaced. Note that he must first assign M:LO. (But, see the 
META command below, where this assignment is changed.) 

XSET M:GO / B INOUT © 

He wants the binary output to go to disk file BINOUT. He could alternatively have used the command: 
_[OUTPUT ON BINOUT 

XSET M:CO PI® 

This command assigns the DCB for compressed output to logical device stream PI. Utilization 
privilege is required when PI is associated with the card punch (its default association). 



iMETA INFILE ON ,LP© 
WITH> SO,CO @ 

The user now calls META to assemble a source file. He requests a source listing on the line printer 
(privilege required) and a compressed output deck. 
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[RUN (NP) BINOUT («i^ 

He now calls RUN to load and execute the program. 

LINKING BINOUT 
!_ 

Control returns to TEL, with no error messages having been issued. 



BASIC PROCESSOR REQUIREMENTS 

The BASIC processor uses the following DCBs for its I/O: 

DCS Definition Default Assignment 



M:SI Source input. 

M:EI Stream 1 . 

M:EO Stream 2. 

M;CI Stream 3. 

M:LO Stream 4. 

M:DO Diagnostic output and out- 

put that results from a 
PRINT statement or a LIST 
command . 

M:SO Output that results from a 

SAVE, FILE, LOAD, 
RENUMBER, or CHAIN 
command . 

The assignments for any of these DCBs may be changed via the SET command. For example, the assignment for the 
M:DO DCB for an on-line job may be changed to line printer by the command 

ISETM:DO LP 

If either the M:SI or M:DO DCB has been affected inappropriately by previous processing during the on-line ses- 
sion, it may be reset to the BASIC default assignment by means of the SET deb command. Both of them may be reset 
at the same time via the RESET command. All other DCBs are reset to their BASIC default assignments automatically 
by the BASIC processor. 



User's console (on-line job) 
Card reader (batch job) 

File 

File 

File 

File 

User's console (on-line job) 
Line printer (batch job) 



File 
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GENERAL 

The several oufpufs from a compllafion or assembly (or "standardized" user processor) can be selectively turned off 
by a DONT LIST, DONT OUTPUT, or DONT COMMENT command, either before calling a processor or during an 
interrupt of the processor. These specifications retain their effect across job steps, until reset or negated. Outputs 
may be resumed by a LIST, OUTPUT, or COMMENT command, or by specifying output destinations in a MET A, 
FORT4, or user-processor command. LIST affects the M:LO DCB, normally used for listing output; OUTPUT affects 
the M:GO DCB, normally used for ROM output, and COMMENT affects the M:DO DCB, normally used for diagnostic 
output. (M:DO cannot be affected with the META, FORT4, etc., command parameters.) 

If you have assigned output to a "symbiont device", such as line printer or card punch, the output is stored on disk 
until you give an explicit or implicit Indication that it is complete and ready to be printed or punched. You do this 
explicitly by issuing the TEL command PRINT, or implicitly by logging off. (Note that utilization privilege is 
required for these central-site units, hov/ever.) 

DISCONTINUING AND RESUMING STANDARD OUTPUTS 

You may interrupt META or FORT4 and turn off output by one of the following commands: 

• DONT LIST turns off list output. 

• DONT OUTPUT turns off binary output. 

• DONT COMMENT turns off error commentary. 

The DONT LIST and DONT OUTPUT commands may also be given before calling META or FORT4 if these outputs 
are not desired. 

Output may be resumed by one of the following commands: 

• LIST resumes list output as previously specified. 

• OUTPUT resumes binary output as previously specified. 

• COMMENT resumes error commentary as previously specified, or at the terminal by default. 

Each of the above commands remains in effect during a session until you issue another command to redirect output. 
The forms of these commands For explicitly directing or redirecting outputs are given in Chapter 10. 

Example 45. Discontinuing and Resuming Output by OUTPUT, LIST, and COMMENT Commands 



_!_BUILD IMILE 


© 








The user b 


ullds 


a source 


file 


of Meta-Symbol statements. 


1.000 




SYSTBM 




BPM @ 


2.000 




SYSTEM 




SIG7© 


3.000 START 




LI,R1 




1@ 


4.000 




SLSjRl 




24® 


5.000 




LW,R2 




Rl@ 


6.000 




STW,R2 




Y© 
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7.000 



8.000 Y 



9.000 



10.000 © 



M:EXIT© 

RES 1© 

END START @ 



mUTPUT ON OUTFILE @ 
ILIST ON LFILE @ 

The user specifies the destination files for binary output and object listing. 

_!_DONT OUTPUT © 
mONT LIST © 

For his first assembly, he only wants to test for assembly errors, and so he turns off the OUTPUT and 
LIST options. 

_[_META INFILE © 
WITH> © 

He calls META to assemble the source file. 

3 01 00000 22000001 N START LI.Rl 1 



3.000 



'Wo'ov UNDEF SYM 



4 01 00001 25000018 N 



SLS,R1 24 



4.000 



■j<*-k* UNDEF SYM 



5 01 00002 32000000 N 



LW,R2 Rl 



5.000 



IQUIT © 



The user notices that he forgot to define Rl and R2, and so he Interrupts by depressing Y^ and aborts 
META by typing a QUIT command. 



J_EDIT INFILE © 
EDIT HERE 

He calls Edit to Insert definitions Into the source file, 

*IN2.5,.l @ 

2.500 Rl EQU 1 © 

2.600 R2 EQU 2 © 

2.700 © 
^END © 

He then leaves Edit. 
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lOUTPUT @ 


_!_LIST © 


This time he believes that the program is error-free, and so he now resets the OUTPUT and LIST options. 


_[META INFILE © 


He now reassembles. File INFILE must be respecified since M:SI defaults to the terminal at each new 


job step. 


WITH> © 


* NO UNDEFINED SYMBOLS 


* ERROR SEVERITY LEVEL: 


* NO ERROR LINES 


i 



PRINT COMMAND 

Output directed to the symbiont output devices (card punch and printer) is normally not queued for actual output 
on those devices until you log off. This feature has the advantage of causing all of the output for one job to come 
out together. 

However, yoj may want some of your output printed or punched immediately. The PRINT command causes your 
symbiont files to be closed and queued for output at once (if you have the required utilization permission). 

Example 46, Causing Printer or Punch Output to be Queued by Issuing a PRINT Command 



_J_COPY ME TO LP © 

The user wants to enter lines at the terminal to be copied to the line printer. 

/THESE LINES ARE DIRECTED TO THE LINE PRINTER © 

^THEY ARE NORMALLY NOT QUEUED FOR PRINTING UNTIL THE USER LOGS OFF.© 
^THE FOLLOWING PRINT COMMAND WILL CAUSE THEM TO BE PRINTED.© 
j.©F 

The Escape F signals end-of-input. 
_|PRINT © 

This command causes the line printer output to be queued immediately. 
I 

The session continues. 
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12. SAVING/RESTORING CORE IMAGES AND FILES 



GENERAL 

A core image of a program in process, along wifh relevanf program confext, can be saved on a disk file during an 
inf-erruption of execuHon. You mighf offen wanf fosave the core image of a patched program at one or several 
stages of a complex debugging process, e.g., to ensure against errors in ensuing patches. The saving and reloading 
of core images is achieved with the ! SA VE and !GET commands, shown in the first two examples to follow. 

Although program-l/O file identification information is saved along with the core image, file-positioning information 
is not saved (and the files themselves may not be saved if closed automatically by the system). If, however, a given 
program is not sensitive to these considerations, then SAVE/GET can also be used as a production checkpoint-restart 
mechanism . 

Disk (i.e., RAD or disk pock) storage is the predominant file-storage medium for the on-line user, because of the nature 
of remote on-line operation and the central role played bythis type of storage in integrated batch/time -sharing op- 
erating systems such as CP-V. The advantages of disk storage over other types of file media were discussed briefly in 
Chapter 4. Disk files are, however, susceptible to loss in certain types of catastrophic system fai lures, or "crashes", that 
sometimes occur. Although the system provides extensive, automatic protection against complete file loss (as 
described below), generally on an "all files" basis, you can selectively create backup files anytime you feel this 
action is indicated. (For example, after creating an important file when working with a relatively new installation 
that has not yet ironed out all the wrinkles.) 

Files may be saved or backed up either on the standard system save/restore magnetic tape by means of the TEL 
BACKUP command, or on your own private tape, pack, or on punched cards by means of the PCL COPYALL or 
COPY command. 

Another characteristic of disk storage is that its capacity is fixed in a sense that magnetic-tape or punched-card 
storage is not, and that you can easily misuse it: (1) by not promptly deleting unneeded files (you are normally 
charged for permanent disk space actually used, not the total extent allowed for your use), and (2) by allowing 
little-used files to remain on disk. You can transfer files of the latter class to tapes by the same means used to 
create backup copies — but do not forget to delete them from disk after verification of the copying! 

SAVE AND GET COMMANDS 

You can take a "checkpoint" of a core image at some desired point by interrupting the execution and issuing a 
SAVE command. The core image of the program and other information that enables the system to reconstruct the 
program's environment (other than l/O-file positioninj) are then saved on disk. After you issue the SAVE command, 
the interrupted program can be resumed by a GO o CONTINUE command. 

Later you can restore the checkpointed program to core by issuing a GET command. Following the GET command 
by a GO or CONTINUE command causes processing to be resumed at the point at which the checkpoint was taken. 

In the next example, we assemble a program with META but discover coding errors when it does not execute prop- 
erly. Instead of editing the source file and reassembling, we choose to enter patches with DELTA (see Chapter 7). 
To preserve a patched version of the program, we interrupt prior to execution and issue a SAVE command. The 
patched version is restored by a GET command in Example 48 and executed again. 

Example 47. Saving a Core Image of a Program (SAVE Command) 



! BUILD INPUT® 



1.000 SYSTEM BPM @ 

2.000 SYSTEM SIG7 © 
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3.000 


_ 


REF 




M:UC © 


4.000 


_START 


LI,1 




RETURN @ 


5.000 




STW,1 




EXIT © 


6.000 




LCI 




© 


7.000 




STM,0 




REGS © 


8.000 




B 




SUBR© 


9.000 


RETURN 


CW,15 




REGS+15 © 


10.000 




BNE 




ERROR @ 


11.000 


. 


CW,14 




REGS+14 © 


12.000 




BNE 




ERROR © 


13.000 


_ 


LI , 14 




BA(REGS) @ 


14.000 


_ 


LI, 15 




56 © 


15.000 




SLS,15 




24 © 


16.000 


. 


CBS , 14 




© 


17.000 




BNE 




ERROR © 


18.000 




MrEXIT 


@ 




19.000 


_ERROR 


LB, 2 




ERR © 


20.000 


. 


MrWRITE 


M:UC, (BUF, ERR), (SIZE, *2),(BTD,1)© 


21.000 




MrEXIT 


@ 




22.000 


_ERR 


TEXTC 




'REGISTERS NOT PRESERVED IN SUBR'© 


23.000 


_REGS 


RES 




16 © 


24.000 


_SUBR 


LI, 2 




100 © 


25.000 


. 


BDR,2 




$ © 


26.000 


. 


B 




*EXIT © 


27.000 


_EXIT 


RES 




1 © 


28.000 


. 


END 




START © 


29.000 


_© 









j_META INPUT ON BO © 
WITH> SD © 

The user assembles the program, and asks for symbolic debugging code to be produced. 

* NO UNDEFINED SYMBOLS 

ERROR SEVERITY LEVEL: 



* NO ERROR LINES 
! RUN BO © 



LINKING BO 



REGISTERS NOT PRESERVED IN SUBR 



The program error message prints. 
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IRUN BO UNDER DELTA © 

The user now runs under Delta because he wants to odd patches to the program before executing again. 

LINKING BO 

DELTA HERE 
"ring" 

The Delta debugging processor identifies itself and prompts with a bell. 
BO;S @ 

The user identifies the symbol table associated with the ROM (BO). 

EXIT+20\ STW.l EXIT+19 © 
EXIT+.15\ LI,1 100 © 
EXIT+.16\ BDR.l $ © 
EXIT+.17\ LW,1 EXIT+19 © 
EXIT+.18\ B *EXIT @ 
SUBR\ B EXIT+20 @ 

He enters patches into the program (see Example 33 for meaning of these commands). 

He dejpresses CONTROL and Y after the prompt to interrupt Delta. The system echoes a left arrow. 

_|_SAVE MYJOB @ 

He issues a SAVE command to save the patched program on file MYJOB. 

_!_G0 @ 

The GO command takes him back to Delta. 

START ;G @ 

He issues a Delta command to start execution of the program. (No prompt is given.) 

EXIT AT RETURN + .9 

Delta prints this message on execution of an M:EXIT. 

The user now leaves Delta. 
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Example 48. Restoring a Checkpointed Program (GET Command) 



_[GET 


MYJOB @ 


















The user restores the checkpointed 
created by the SAVE command in 


core image 
Example 47. 


(the 


patched 


prograrr 


1 on file MYJOB). 


This 


file was 


iGO @ 


















The GO command causes a return to Delta, th 


e processor that was 


nterrupted to perfo 


rm th 


e SAVE. 


STARl 


;G © 


















The user initiates execution. (No 


prompt is g 


ven 


for this 1 


ine.) 








EXIT 


AT RETURN + .9 

The program completes execution. 
















y'i 





































BACKUP COMMAND 

The BACKUP command provides a means of creating backup files. Files are copied to the standard system backup 
tape. Note that the usage of BACKUP may be subject to rules and restrictions conditioned by specific installation 
practices concerning the saving/restoring of files. 

A keyed file called MAILBOX in the user's account will contain completion messages resulting from the backup process. 

The next example illustrates use of the BACKUP command. This example also shows that we must wait for the backup 
process to complete before finding out what is in the MAILBOX file. 

Example 49. Saving a File on the Standard System Backup Tape 



IBUILD MYFILE @ 


The user builds file MYFILE. 


IBACKUP MYFILE @ 


He issues a BACKUP command to copy the file on the system backup tape. 


J_COPY MAILBOX @ 


i 


300 FILE DOES NOT EXIST. 


He wants to see what is in the MAILBOX file, but this file does not yet exist because the backup process 


is not complete. 


_!_COPY MAILBOX © 


He waits a minute or so for the backup process to complete then issues the COPY command again. 


16:18 MAY 25, '71 BY ABCD ON SN45A1 BACKED UP FILE MYFILE 


The completion message in file MAILBOX now prints. 


J_ 
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COPYALL AND COPY COMMANDS 

SAVING ON TAPE 

Many Hmes you will wanf f-o save one, several, or all of your files on magneHc tape, in addition to those implied 
by the "proper usage" guideline offered near the beginning of this chapter. For instance, if you were going on 
an extended vocation, you might want to copy all your disk files to tape and thus save disk storage charges. Or, 
if you are making many versions of a file, perhaps many assemblies, you may want to back up the original file on 
tape. In the next example, the user transfers all the files in his account to tape and pulls them off as needed in 
the session. He also transfers a single, additional file to the tape. The example shows the use of CP-V labeled tape 
rather than free-form tape. Using labeled tape, the user con request his files by name from the tape, as he would 
call them by name from his disk directory. With free-form tape, he would have to know the ordinal positions of 
the files on the tape, and space forward or backward the appropriate number of files before he could read or write 
the files he wanted. (This example is illustrative of what can be done, but not necessarily of what may normally 
be done, since it implies usage of a central-site resource in a manner that may or may not be allowed in a given 
installation.) Note that copying one file or the entire account to tape does not automatically delete the file(s) 
from disk; disk files must be explicitly deleted by command. Also, tape files are no longer "in the system". That 
is, the system "knows" only of files in the user's account on disk; the user is responsible for knowing the tape's 
label or number, and for notifying the central-site operator of the same (see Chapter 14). 

Remember that any utilization of magnetic tape, as well as any other central-site resource, requires a prior 
permission by the installation. 

See the CP-V/TS Reference Manual, 90 09 07, Chapter 5, for a description of the Rewind (REW) and Space- 
to-EOT (SPE) commands shown in the next example. 

Example 50. Transfer of All Files in User's Account to Labeled Tape 



1PCL@ 
PCL POO HERE 
<LIST @ 
ARCSINE 



DATAFIL 



JOBFIL 



ROMFIL 



SOURCE 



V PRIME 



The user lists the names of the files in his disk account. 

<REW #3B96 @ 

He rewinds the tape ("^3696) he is going to write on, to be certain it is positioned to start of tape. 
This assumes, of course, that the tape has been mounted at the computer site. See Chapter 14 on 
user-operator communication. If the tape already contained files he wanted to keep, he would 
instead want to skip to the position following the last file on the tape by issuing the command 
<SPE LT#3B96. 

< COPYALL TO LT#3B96 @ 

He copies all the files in his account, in succession, to labeled tape (LT) ''^3696, 

<REW #3B96 @ 

He rewinds tape *^3B96 that he has just written on before listing it. He visually compares the list with 
the one he received when he listed the disk directory. 
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<LIST LT#3B96 @ 



ARC SINE 



DATAFIL 



JOBFIL 



ROMFIL 



SOURCE 



VPRIME 



<_COPY ME TO NEW © 

^@F 

The user creates a new file from the terminal. 

<SPE LT#3B96 © 

He spaces labeled tape "^3B96 to the mark following the lost file on the tape, 

<.COPY NEW TO LT#3B96/NEW © 

He adds file NEW to labeled tape #3B96. 

<.REW #3B96 @ 
<_LIST LT#3B96 @ 

ARC SINE 



DATAFIL 
JOBFIL 



ROMFIL 



SOURCE 



VPRIME 



NEW 



He rewinds tape ^3B96 and lists the names of its files. PCL has successfully added file NEW after the 
last file written to tape, VPRIME. 



<_DELETEALL @ 
DELETEALL? 
<YES$ @ 

7 FILES DELETED 



Satisfied that his files are safely stored on tape, he now deletes all files in his disk account. PCL 
requires a "YES$" verification of the DELETEALL request, and upon its receipt, PCL deletes all of the 
user's files and so notifies him. 
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<_REW #3B96 @ 

<_COPY LT#3B96/NEW TO INPUT © 


























The user wishes to use file NEW as inpuf to a 
back fo his account with a new name, INPUT 


processor la 


ter in 


the 


sesslor 


. 


He 


calls 


it from the 


tape 


£REM #3B96 @ 


























He issues the REMOVE command, 
to the control -site operator. 


which 


rewinds the 


tape 


and 


automatica 


ly 


issues a 


'dismount" 


message 


<_END @ 


























I 
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13. SUBMITTING BATCH JOBS 



BATCH COMMAND 



The BATCH command is used to submit a batch job deck stored on a file to the batch input stream. This job deck 
must include all appropriate batch control cards that would be needed for normal batch job submission. 



Example 51. Submitting a Job via BATCH Subsystem for Execution 



1.000 


SYSTEM 


2.000 


SYSTEM 


3.000 


REF 


4.000 START 


M:WRITE 


5.000 


M:EXIT @ 


6.000 


ERROR 


7.000 MES 


TEXT 


8.000 


END 


9.000 ^^ 





lEDIT © 

EDIT HERE 

*BUILD BATCHIN © 

The user builds a source program that he wishes to assemble in the batch environment. 

SIG7 © 
BPM @ 
M:LO © 
M:L0,(BUF,MES),(SIZE,9)© 

THIS LINE CONTAINS AN ERROR @ 
' IT WORKS . ' © 
START © 

*BUILD JOBA© 

He builds a file containing a batch job-control deck that will assemble the file called BATCHIN. 

1.000 '.JOB © 

2.000 ! ASSIGN M:SI, (FILE, BATCHIN) © 

3.000 lASSIGN M:B0, (FILE, BINARY) © 

4.000 IASSIGN M:D0, (FILE, ERRORS) © 

5.000 IMETASYM SI, BO, LO © 

6.000 © 
*END © 

iBATCH JOBA © 
ID=0028 SUBMITTED 9:13 MAY 26, '71 

He submits the batch job he has just created. The job identification (ID) prints as a hexadecimal value. 
Note that the JOB command did not specify an account, user name, or priority. When these parameters 
are omitted, they are supplied by the system and default to the logged-on account, user name, and the 
highest priority authorized that user. 
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CANCEL COMMAND 

If the user wishes fo cancel a job previously submitf-ed by fhe BATCH command, he may do so by using fhe CANCEL 
command. 

CANCEL jid 

where jid is the job identification that printed just after the job was submitted. 

JOB COMMAND 

The JOB command is used to ask for the status of a batch job. The system responds that the job is either completed, 
running, or still waiting to be run. The format of the command is 

JOB jid 

where jid is the job identification that printed just after the job was submitted. 

Example 52. Using the JOB Command 



!JOB 28 @ 



The user requests the status of the job submitted in the previous example. The job identification 0028 
is the same as the one reported when the job was submitted using the BATCH command. 



WAITING: 1 TO RUN 

The system answers that there is one batch still to be run before this job is run. 

iJOB 28 @ 

Later the user asks again. 

COMPLETED 

Now the job is complete. 

ICOPY ERRORS ON ME @ 

The user displays the diagnostics from the job at the terminal. Note that M;DO was assigned to file 
ERRORS in the job-deck JOBA. 

6 ERROR THIS LINE CONTAINS AN ERROR 



6.000 

VoWo'f UNDEF SYM 
.vvoVVf ILLEGAL AF 



* UNDEFINED SYMBOLS 



Vc 


THIS 
ERROR SEVERITY LEVEL: 


3 


ERROR LINES 
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14. COMMUNICATION WITH THE OPERATOR 



MESSAGE COMMAND 

The MESSAGE: command causes a message to be sent to the centra I -site computer operator. The message may be 
from 1 to 72 characters in length. 

The format of the command is 

!M[ESSAGE] message -text 

If the message-text exceeds 44 characters, the first 44 characters are printed on one line at the operator's console 
and the remaining characters are printed on a second line. 

In the next example, the user informs the operator that he needs a scratch tape. 
Example 53. Sending a Message to the Operator 



IMESSAGE READY SCRATCH TAPE TO 


BECOME #9055.® 
















The user sends a message to th 


e computer operator 


request 


ng that he 


be 


ready 


to mount 


a scratch tape. 


_!_BUILD DATAPOINTS @ 


















He builds file DATAPOINTS. 


















ICOPY DATAPOINTS TO FT#9055 @ 


















He requests that the file to be 
informs the operator where to 


copied to a free-form tape 
mount the requested scratch 


with the seria 
tape. 


numb 


er9055. 


The 


system 



MESSAGES FROM THE OPERATOR 

The computer operator can send a message to an individual terminal or broadcast a message to all users. When he 
broadcasts a message, the message is placed into the right-hand part of the page title for the terminals and it will be 
seen by a user when he receives a new page heading. A message sent to an individual terminal may appear anywhere 
in the user's output. 

Note: If the PLATEN command was used to turn page headings off, the broadcast message will not appear. 

In the next example, the user receives a message informing him that the system will soon go off. He issues a BACKUP 
command before logging off to insure that his latest files will be saved. This action may not really be necessary, de- 
pending on installation practice; the system normally will save all files automatically before going off. 



Ex 


ample 54. 


Receiv' 


ng 


a 


Messag 


e from the 


Opera 


tor 




IBUILD XYZ; @ 
















The 


user bu' 


Ids 


a 


source 


file. 
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1.000 SYSTEM BPM @ 

2.000 SYSTEM SIG7 @ 

3.000 REF M:UC,M:LO@ 



!L 



He wants to continue file building (or processing) on a new page, so he simultaneously depresses 
CONTROL and L to cause a page eject. 



(page eject) 



23:45 05/26/71 JONES ABC 1BB-F[17] CP-V WILL GO OFF AT 2400 

Included as part of the page heading is the message from the operator CP-V WILL GO OFF AT 2400. 
This message has been sent to all users. 

IBACKUP XYZ @ 

The user decides to terminate his processing at this time, and he uses a BACKUP command to save his 
last file. 

\p?¥ @ 

-accounting summary- 
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APPENDIX A. TEL COMMAND SUMMARY 



Table A-1 is a summary of TEL commands. The first column gives the command format, the second column gives the 
command's function and option codes. For the structure of file names (fid, rom, Imn) see Table B-1. 

Table A-1. TEL Command Summary 



Command 


Description 


BACKUP fid 


Saves the specified file on a system tape. In case of a crash 
in which files are lost, files on the tape will be restored. 


BATCH fid[,fid]. . . (Simplified format) 


Enters the specified file(s) in the batch job stream. 


B[U1LD] fid 


Allows a new file to be created from the terminal using the 
Edit processor. 


BYE 


Disconnects the terminal from the system and provides an ac- 
counting summary. This command is equivalent to the OFF 
command. 


CANCEL jid[,]id] ... 


Cancels previously submitted batch jobs. 


COBOL[sp]g^^^[rom][,list]] 


Compiles an ANS COBOL source program. 
Options: 

sp may be fid or ME. 

rom may be fid, stream-id, CP, or NO. 

list may be fid, stream-id, LP, ME, or NO. 

Output may be interrupted and continued by the following 
commands: 

LIST DONT LIST DONT COMMENT 
OUTPUT DONT OUTPUT CONTINUE 
COMMENT 


COMMENT ^^^^ list 


Directs error commentary to the specified device, or counter- 
acts the preceding DONT COMMENT command. Option: 
list may be fid, LP, ME, or stream-id. 


CONTINUE 


Continues processing from the point of interruption. This 
command is equivalent to the GO and PROCEED commands. 


C[OPY]sfg^JJdf 

(Simplified formcjt) 


Copies a file or device input to the specified file or device. 
Options: 

sf may be fid or device code, 
df may be fid or device code. 

(See PCL section for complete description.) 


Whenever TO is specified, ON may be substituted. 
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Table A-1. TEL Command Summary (cont. ) 



Command 


Description 


COUPLE 


Allows other terminals to couple to this terminal. 


COUPLE line 


Establishes a link between the user's terminal and the terminal 
specified by line. 


DECOUPLE 


Releases the coupling between two terminals. 


DrCLETdC^^*^/^ 1 




Deletes the specified file(s). 

Option: rt is the 2-character identifier of a device that was 
defined at SYSGEN to be a resource. 


DLELETEJI^p^^^^.^l „^^b3,|^_,^J/J 




1 fid[,fid]. .. 




DELTA 


Calls the Delta processor. 


di[splay] 


Lists the current values of various system parameters. 


DON T COMMENT 


Stops error commentary output. 


DONT COUPLE 


Causes attempts to couple to the terminal to be rejected. 


DONT LIST 


Stops listing output. 


DONT OUTPUT 


Stops object output. 


DONT SEND 


Disallows messages from the machine operator to the user's 
terminal. Global broadcasts are deferred until TEL is in 
control. Also disallows the MESSAGE command. 


E[D1T] [fid] 


Calls Edit to modify a file. 


END 


Terminates the current job step. This command is equivalent 
to the STOP and QUIT commands. 


ERASE 


Deletes the accumulated output for the line printer. 


EXTEND 


Sets the extended memory mode; i.e., appends the special 
processor area to the available user area. 


FORT4[sp]g|^^^ [rom][,list]] 


Compiles a Xerox Extended FORTRAN IV source program. 
Options: 

sp may be fid or ME. 

rom may be fid, stream-id, CP, or NO. 

list may be fid, stream-id, LP, ME, or NO. 

Output may be interrupted and continued by the following 
commands: 

LIST DONT LIST DONT COMMENT 
OUTPUT DONT OUTPUT CONTINUE 
COMMENT 


GET fid 


Restores the previously saved core image. This command is 
equivalent to the RESTORE command. 
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Table A-1. TEL Command Summary (cont. ) 



Command 


Description 


GO 


Continues processing from the point of interruption. This 
command is equivalent to the CONTINUE and PROCEED 
comrrrands. 


JOB jid[,jid]. .. 


Requests the status of jobs that were submitted to the batch 
queue via the Batch processor. 


L 


LT'^reel-idr-rt][(s)] 

[DC][.acct][(s)] 

LT# serial no. [-rt][(s)]/fld [(s)Lfid[(s)]]. . . 

fid[(s)][,fid[(s)]]... 

DP^reel-id[-rt][(s)] 

DP#serial no. [-rt]/fid[(s)]Cfid[(s)]]. . . 

FT^ serial no. [-rt][(s)] 




Lists file names and, optionally, attributes from the account 
directory, tape, or disk pack. 

Options: 

s may be A or EA. 

rt specifies the 2-character identifier of a device that 
was defined at SYSGEN to be a resource. 


LDEV stream-id [, (option)]. . . 


Modifies a logical device definition. 

Options: see CP-V/TS Reference Manual, 90 09 07. 


|iK.t'r^^.:«_J r ifON ,_■] 


Forms the load modules as specified. 

Options: 

library search: (L), (NL), (Pi), (Ji), (FDP), (NP) 
default: (L), (PI) 

display: (D), (ND), (C), (NC), (M), (NM) 
default: (D), (C), (NM) 

symbol tables: (I), (NI) 
default: (I) 

execute accounts: (EX,acct[,acct]. . . ) 

rom may be fid or $; parentheses enclosing roms cause merge 
of symbol tables. 

lid must name a file containing one or more roms. 


Ll 


iNiNL'^K"i"'"j""'"Lf"-"" •••JLoVER J 




' — Dl'dLlid]. . .][UNDER FDP] 


L^^^KvER'-^tl 


Directs the listing output to the specified device, or counter- 
acts the preceding DONT LIST command. 

Option: list may be fid, LP, ME, or stream-id. 
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Table A-1. TEL Command Summary (cont. ) 



Command 


Description 


'"i"[sp][oVER t''°'^3Dl'st] 


Initiates execution of a load module. 
Options: 

Imn has the form: 

name[.[account][. password]] 

absence of period and account specifies system account. 

presence of period and absence of account specifies 
log-on account. 

sp is assigned to M:SI DCB. 

rom is assigned to M:GO DCB. 

list is assigned to M:LO DCB. 


M[ESSAGE] text 


Sends the specified message to the operator. The first char- 
acter of the message may not be a period (. ). 


META[sp][q^^^ [rom][,llst] 


Assembles the specified Meta-Symbol source program. 
Options: 

sp may be fid or ME. 

rom may be fid, stream-id, CP, or NO. 

list may be fid, stream-id, LP, ME, or NO. 

Output may be interrupted and continued by the following 
commands: 

LIST DONTLIST DONT COMMENT 
OUTPUT DONT OUTPUT CONTINUE 
COMMENT 


OFF 


Disconnects the terminal from the system and provides an ac- 
counting summary. This command is equivalent to the BYE 
command. 


^U^PUT [§VER f'^] 


Directs ob|ect output to the specified file, or counteracts the 
previous DONT OUTPUT command. 


PAGE n 


Resets the terminal header page number to the value specified 
by n. 


PASSWORD, old -password, new-password 
PASSWORD, , new-password 
PASSWORD, old -password. 


Assigns, changes, or deletes a log-on password for the user. 
The password is 1-8 characters and cannot contain 

1 , ;<>. /= ? 

and all COC control characters. A null field is used to 
specify non-existence of either an old or new password. 
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Table A-1. TEL Command Summary (cont. ) 



Command 


Description 


platen[w1Li] 


Sets the value of the terminal platen width and/or page 
length if w and/or 1 are specified; or displays the terminal 
platen width and page length values if neither w nor 1 is 
specified. (Page length does not include header. ) 


PRINT 


Sends accumulated symbiont output, such as output for the 
line printer or the card punch, to the output device. 


PROCEED 


Continues processing from the point of interruption. This 
command is equivalent to the GO and CONTINUE 
commands. 


Processor Calls 


These calls are entered while TEL is in control of the terminal. 
They turn over control of the terminal to the processor. 
Examples are: 

APL LYNX 
BASIC PCL 
FLAG 


q[uit] 


Terminates the current job step. This command is equivalent 
to the STOP and END commands. 


r[eset] 


Resets all DCBs back to their system default values. 


RESTORE fid 


Restores the previously saved core image. This command is 
equivalent to the GET command. 


RUN [opl-ions][rom[,rom]. . ..] Qwro Imn 1 


Loads the specified module and starts execution. 

Options: 

library search: (L), (NL), (Pi), (FDP), (NP) 
default: (L), (PI) 

display: (D), (ND), (C), (NC), (M), (NM) 
default: (D), (C), (NM) 

symbol table: (I), (NI) 
default: (I) 

rom may be fid or S; parentheses enclosing roms cause merge 
of symbol tables. 

lid must name a file containing one or more roms. 


l—[;IId[,lid:|...] [under °^^p^^] 


5^VE IS^er) «d 


Saves the current core image on the designated file. 


SEND 


Allows messages from the machine operator to be printed on 
the user's terminal. 
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Tdble A-1. TEL Command Summary (cont. ) 



Command 


Description 


SET dcb[0] 

opiabel 

ccT J L device 
SET deb ^ . , 
siream-id 

tapecode[tapeid] 

cr--r , 1 tapecode[tapeid][- 
SET deb r., . r A 
LfilecodeL-rl-J • 

SET deb JR/fid 


[;dopt]. . . 
■■■^^ /fid[;fopt]. . . 


Assigns file or device to a DCB or sets DCB parameter. 

Options: 

rt is the 2-character identifier of a device that was de- 
fined at SYSGEN to be a resource. 

other options, see Tables C-1 through C-4. 


SHOW [option [,option]. . .] 


Displays information about currently logged-on user. 
Options: USER, PRIV, DCBS, M:xx or F:xx, or ALL. 


s[tart] '""' [u[nder delta]] 


Loads a load module into core and starts execution of the 
program, either with or without an associated debugger. 


st[atus] 


Displays the current accounting values. 


STOP 


Terminates the current job step. This command is equivalent 
to the END and QUIT commands. 


SWITCH [set = n[,n]. . . [RESET = n[,n]. . .]] 


Controls setting and resetting of the user's pseudo sense 
switches, where n ranges from 1 to 6, With no arguments the 
command displays the pseudo sense switch settings. This 
command is the equivalent of the batch ISWITCH command. 


TABS [s[,s]. . .] 


Sets simulated tab stops for the terminal if s values are spec- 
ified; or displays the simulated tab stop settings if no s value 
is specified. 


T[ERMINAL]t-ype[,algorithm] 


Sets the terminal type for proper I/O translations. Type may 
be 33, 35, 37, 7015, DATAFPOINT], EAPL, ESTD, 
EXEC[UP0RT], MEM0[REXJ, SAPL, SSTD, or TI. Algorithm 
may be 0-7. 


t[erminal] stat[us] 


Lists the terminal type and the current values of parameters 
associated with its operation. 


TP 


This command logs off a time-sharing terminal and makes it 
available as a slave Transaction Processing terminal. 


U 


Causes the words UNDER DELTA to be inferred in the next 
command. 


WHERE account, name 


Returns the line number of the specified user (if the user is 
logged on). 
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APPENDIX B. FILE IDENTIFIERS AND THEIR PARTS 



A file idenl-ificafion (fid) consists of a file name and optionally an account and/or a password. Special types of 
files are an Imn (load module) which is produced as a result of a LINK or RUN command, and a rom (relocatable 
object module) which is produced by an assembler or compiler. Table B-1 Illustrates the structure of a fid. 



Table B-1. File Identifiers and Their Parts 



Symbol 


Structure 


Imn 


a file Identifier (fid) that names a load module. 


rom 


a file identifier (fid) that names a relocatable object module. 


fid 


name [.[account] [.password]] 


name 


1 to 12 characters of the X character set. 


account 


1 to 8 characters of the X character set. 


password 


1 to 8 characters; the following characters may not be used: 1 , ; 
<>./=? and all control characters acted upon by the COC. 


X character set 


A-Z a-z 0-9 " — $ * % : ^g) - 


The usage "name. " is valid onl 


y when the fid is an Imn used as a command verb (see Chapter 8). 
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APPENDIX C. SET COMMAND CODES 



Tables C-1 through C-4 define the codes which may be used as options In the SET command. 

Toble C-1. DCB Assignment Codes —SET Command 



Type 


Codes 


Description 


Operational Label 


BI, BO, C, CI, CO 
DO, EI, EO, LL, LO, 
OC, PO, SI, SL, SO, 
UC, and others de- 
fined at SYSGEN. 

NO 


When the DCB Is assigned to one of the system op- 
erational labels, the actual device connected to 
the DCB is that Implied by the operational label, 
if any, for on-line mode. 

No assignment. I.e., no default Is to be applied. 


Device 


CP 

LP 

PL 

(and others defined at 

SYSGEN) 


Card punch. 
Line printer. 
Plotter. 


Logical Device Stream 


LI 

CI 

PI 

(and others defined at 

SYSGEN) 


Line printer. 
Card reader. 
Card punch. 


Magnetic Tape (tapecode) 


LT 
AT 
FT 


Xerox labeled tape. 
ANS labeled tape. 
Free form tape. 


Secondary Storage (filecode) 


DP 


Disk pack storage. 



Table C-2. Device Options —SET Command 



Format 


Description 


ASC[II] 
EBC[DIC] 


ASCQl] specifies code conversion (between ASCII on tape and EBCDIC In core). 
EBC[DIC] specifies no code conversion. EBCDIC is assumed by default and ASCII Is 
legal only for tapes having this feature. 


BCD, BIN 


Controls the binary-BCD mode for device read and write operations. BIN used in con- 
junction with DRC will invoke the transparent mode. (See Transparent Mode section of 
Chapter 11.) 


COUNT = value 


Turns on page counting and specifies the column number at which the page number Is to 
be printed. 


DATA = value 


Controls the beginning column for printing or punching and Is a decimal value. The 
maximum value Is 144. 


^^HZ) 


Specifies the density that will be used on a dual density tape device. 
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Table C-2. Device Options — SET Command (cont. 



Format 


Description 


DRC, NODRC 


Turns the special formatting of records on and off. DRC specifies that the monitor is 
not to do special formatting of records on read or write operations. NODRC specifies 
the monitor is to do special formatting. If neither DRC nor NODRC Is specified, 
NODRC is assumed by default, DRC used in conjunction with BIN will Invoke the 
transparent mode. (See Transparent Mode section of Chapter 11. ) 


FBCD, NOFBCD 


Controls the automatic conversion between external Hollerith code and internal 
EBCDIC code (FORTRAN BCD conversion). NOFBCD is assumed by default. 


IN 
OUT 
INOUT 
OUTIN 


Specifies the input mode. 

Specifies the output mode. 

Specifies the input and output mode (i.e., the update mode). 

Specifies the output and input mode (i.e., the scratch mode). 


L, NOL 


Identifies the device type. L specifies that the device must be listing type. NOL spec- 
ifies that it need not be listing type. NOL is assumed by default. 


LINES = value 


Specifies the number of printable lines per page and is a single decimal value. The 
maximum value is 255. 


PACK, UNPACK 


Controls the packed or unpacked mode of writing 7-track tape. PACK is assumed by 
default. 


RECL = value 


Specifies the default record length, in bytes. The greatest value that may be spec- 
ified is 32,767. If RECL is not specified, a standard value (appropriate to the type 
of device used) will apply. The value specified in a SET command will override 
that assembled into the DCB but will not override the RECL specification of an 
MrOPEN call or the SIZE specification of an M:READ or M:WRITE procedure call. 


SEQ[= value] 


Specifies that sequence numbers are to be punched in columns 77-80 of punched output. 
Four characters of nonblank sequence identification may be given for columns 73-76. 
Fewer than 4 characters are left-justified and blank filled. 


SN[= value 1 


Specifies the serial numbers of volumes that are to be used for input or output. The serial 
number may be from 1 to 4 characters except for ANS labeled tape serial numbers which 
must be 6 characters. A maximum of Sserial numbers may be specified. If a serial num- 
ber is specified with the tapeid, it is included in the 3 allowed. An existing list of 
serial numbers may be removed by specifying the SN option with no arguments. 


' — [, value] [, value]] 


SPACE = value 


Specifies the number of lines of space after printing and is a single decimal value. 
Values of or 1 result in single spacing. The maximum value is 255. 


TAB = tab[, tab . . .] 


Specifies simulated tab stops and is followed by a list of up to 16 decimal numbers, 
separated by commas, giving the column position of the stops. If all 16 stops are not 
specified, the stops given are assigned to the first stops and the remainder are reset. 


TRIES = value 


Specifies the maximum number of recovery tries to be performed for any I/O operation. 
The greatest value that may be specified is 255. The default value is 10. 


VFC, NOVFC 


Controls the formatting of printing by using the first character of each record. VFC 
specifies that the first character of each record is a format-control character. 
NOVFC specifies that records do not contain a format-control character. NOVFC 
is assumed by default. 
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Table C-3. F!l« Options -SET Command 



Type 


Format 


Disk 


X«rox 
Tape 


ANS 
Tope 


Description 


Organ izaf ion 


CONSEC 

KEYED 

RANDOM 


X 
X 
X 


X 
X 




Consecutive record organization. 

Keyed record organization. 

Contiguous relafive-sector ad- 
dressed organizufion. 


Access 


SEQUEN 
DIRECT 


X 
X 


X 
X 




Records will be accessed 
sequentially. 

Records will be accessed by 
key. 


Function 


r SHAREjl 
"^L' EXCL IJ 

OUT 


X 
X 


X 
X 


X 
X 


File is read only. The "SHARE" 
argument specifies the share mode 
for the DCB which admits the pos- 
sibility of more than one IN user of 
the file. The "EXCL" argument 
specifies the exclusive mode for 
the DCB which prohibits more than 
one IN user of the file. SHARE is 
assumed by default. 

File is write only. 


'^^^1' EXCL J 
OUTIN 


X 
X 


X 
X 


X 
X 


File is to be updated. The "SHARE" 
argument specifies the share mode 
for the DCB which admits the pos- 
sibility of more than one IN OUT 
user of the file. The "EXCL" 
argument specifies the exclusive 
mode for the DCB which prohibits 
more than one IN OUT user of the 
file. EXCL is assumed by default. 

File is scratch. 


Record Length 


RECL= value 


X 


X 




Specifies the default record length, 
in bytes. The greatest value that 
may be specified is 32,767. If 
RECL is not specified, a standard 
value (appropriate to the type of 
device used) will apply. The 
value specified in a SET command 
will override that assembled into 
the DCB but will not override the 
RECL specification of an M;OPEN 
call or the SIZE specification of 
an M:READ or MWRITE procedure 
call. 


(LRECLl , 

Irec r^*"'"^ 






X 


Specifies the logical record size 
in bytes. The value may be in the 
range 1 through 32, '67. 
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Table C-3. File Options — SET Command (cont. ) 



Type 


Format 


Disk 


Xerox 
Tape 


ANS 
Tape 


Description 


Block Size 


BLK[L]=value 






X 


Specifies block size in bytes. The 
value may be in the range 
1 through 32,767. If a value less 
than 18 bytes is specified, 18 bytes 
are written. 


Recovery Tries 


TRIES=value 


X 


X 


X 


Specifies in decimal the maximum 
number of recovery tries to be per- 
formed for any I/O operation. The 
greatest value that may be specified 
is 255. The default value is 10. 


Disposition 


REL 
SAVE 


X 
X 






OUT or OUTIN file is to be re- 
leased on closing. 

OUT or OUTIN file is to be saved 
on closing. 


Size 


RSTORE=value 


X 






Specifies the number of granules 
allocated to the RANDOM file. 
The value must be in the range 
1 through 16,777,215 (2^4 _ i). 


Storage Control 


CYLINDER 


X 






Specifies that the data blocks of a 
public file are to be allocated from 
public disk packs having cylinder 
allocation. 


Key Length 


KEYM=value 


X 


X 




Specifies the maximum length, in 
bytes, of the keys associated with 
records within the file, A key 
may consist of up to 31 characters. 
The default value is 11. 


Key Storage 


NOSEP 


X 






Specifies that index blocks of a 
public file are to be allocated in 
the same manner as data blocks. 
(Disk pack if possible; otherwise 
RAD.) 


Additional 
Key Space 


SPARE^value 


X 






Specifies In bytes the amount of 
spare space to be left unused at 
the end of each index block while 
a keyed file is being created or 
updated with sequential access. 
Value may not exceed 255 and the 
default Is 102 bytes. 


Expiration 


mm, dd, yy 
EXP[IRE]= ddd 

(never 




X 




X 


Specifies either an explicit expi- 
ration date, the number of days 
to retain the file, or that the file 
is never to expire. 
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Table C-3. File Options —SET Command (cont. 



Type 



Format 



Disk 



Xerox 
Tape 



ANS 
Tape 



Description 



Index 
Structure 



NEWX-slides 



[, consecutive slides] 



The "slides" argument specifies the 
number of blocks that can be added 
to the file's index since the current 
higher-level index structure was 
built; if the specified value is ex- 
ceeded, the higher-level index 
structure will be rebuilt when the 
file is closed. If a value of 255 
is specified, the higher-level 
index structure will not be built 
(or rebuilt). If NEWX is not 
specified, the value 254 is used 
in default. 

The "consecutive slides" argument 
specifies the number of contiguous 
blocks that can be added to the 
file's index since the current 
higher-level index structure was 
created; if the specified number 
is exceeded, the higher-level 
index structure will be rebuilt 
when the file is closed. If the 
number is not specified, 2 is used 
in default. 



Execute 
Accounts 



ex[ecute] 



acct L, acctj. 

ALL 

NONE 



Specifies the account numbers of 
the accounts that may execute the 
load module. A maximum of 8 ac- 
counts may be specified. The 
value ALL may be used to specify 
that any account may execute the 
file. The value NONE may be 
used to specify that no other ac- 
count may execute the file. In all 
of the above cases, READ, NONE 
is implied in the absence of any 
READ specification. This option 
with no arguments resets all pre- 
vious execute account entries in 
the DCB. 



Read 
Accounts 



r[ea]d 



acct [,acct], 
ALL 
[NONE 



Specifies the account number of 
those accounts that may read but 
not write the file. This option is 
applicable to OUT and OUTIN 
files. A maximum of 8 read ac- 
counts may be specified. The 
value ALL may be used to specify 
that any account may read the 
file. The value NONE may be 
used to specify that no other ac- 
count may read the file. This 
option with no arguments resets 
oil previous read account entries. 
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Table C-3, File Options —SET Command (cont. ) 



Type 


Format 


Disk 


Xerox 
Tape 


ANS 
Tape 


Description 


Write 
Accounts 


WR[ITE] 


'- 


acct[, acct] . . . 

ALL 

NONE 




X 


X 




Specifies the account numbers of 
those accounts that may have both 
read and write access to the file. 
This option is applicable to OUT 
and OUTIN files. A maximum of 
8 write accounts may be specified. 
The value ALL may be used to 
specify that any account may have 
write access to the file. The value 
NONE may be used to specify 
that no other account may have 
write access to the file. This 
option with no arguments resets 
all previous write account entries. 


Volume Serial 
Number 


SN[=value[, va|-ue][, value]] 


X 


X 


X 


Specifies the serial number of vol- 
umes that are to be used for input 
or output. The serial number may 
be from 1 to 4 characters, except 
for ANS labeled tape serial num- 
bers which must be 6 characters. 
A maximum of 3 serial numbersmay 
be specified. If serial number is 
specified with tapeid, it is included 
in the 3 allowed. An existing list 
of serial numbers may be removed 
by specifying the SN option with 
no arguments. 


Code 
Conversion 


ASC[II] 
EBC[DICl 




X 


X 


ASCII specifies code conversion be- 
tween ASCII on tape and EBCDIC in 
core. EBCDIC specifies no code con- 
version. EBCDIC isthedefault. 
ASCII is legal only for tapes having 
the code conversion feature. 


Recording 
Density 


-^--AZ] 




X 


X 


Specifies the density that will be 
used on the dual density tape device. 


Initial 
Volume 


VOL^value 




X 


X 


Specifies which tape reel in the SN 
list is to be used initiolly. A value 
of 1 designates the first, a value 
of 2 the second, etc. If VOL is 
omitted, a value of 1 is assumed. 


Concatenate 
Tape Files 


[CON]CAT=value 






X 


Specifies the number of identically 
named files that are to be read as 
one logical file (concatenated). 
The value may be in the range 
of 2 through 255. 


Tape Format 


{FORMAT! . 

• . .T- =character 

IFMT 






X 


Specifies the record format. The 
character may be: F = fixed 
length; D = variable specified in 
decimal; V = variable specified in 
binary; or U = undefined. 
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Toble C-3. File Options - SET Command (cont. ) 



Tape 


Format 


Disk 


Xerox 
Tape 


ANS 
Tape 


Description 


Block Count 
Errors 


ABCERR 






X 


Specifies that block count errors 
for ANS labeled tapes are not to 
result in an unconditional abort. 


Execution 
Vehicle 


UN[DER][=name] 


X 






Specifies the name of the only 
processor that may access this 
file if the user does not own the 
file. The name may be from one 
to ten characters. The processor 
may be any shared processor or 
any load module in the :SYS 
account. If EXECUTE accounts 
ore specified and UNDER is not 
specified, the file Is presumed 
to be a load module and 
UNDER = FETCH is implied by 
default. FETCH is the name of 
the monitor routine that places 
a program into execution. 



Table C-4. Operational Label Conventions 



Label 


Reference 


Comments 


Typical On-Line 
Device Assignment' 


BI 


Binary input 


Binary coded input will be received from the 
device to which this label is assigned. 


NO 


BO 


Binary output 


Binary coded output will be transmitted to the 
device to which this label is assigned. 


NO 


C 


Control input 


Input from the device to which this label is as- 
signed will be monitored, so that all control 
commands will be recognized by the monitor. 


ME 


CI 


Compressed input 


Compressed symbolic input will be received 
from the device to which this label is assigned. 


NO 


CO 


Compressed output 


Compressed symbolic output will be transmitted 
to the device to which this label is assigned. 


NO 


DO 


Diagnostic output 


Diagnostic program dumps will be output on the 
device to which this label is assigned. 


ME 


EI 


Element input 


Element file input will be received from the de- 
vice to which this label is assigned. 


ME 


EO 


Element output 


Element file output will be transmitted to the de- 
vice to which this label is assigned. 


NO 


These device assignments are star>dard in CP-V but may be changed at SYSGEN. 
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Table C-4. Operational Label Conventions (cont. ) 



Label 


Reference 


Comments 


Typical On-Line 
Device Assignment^ 


LL 


Listing log 


All control comma rxJs and system messages, 
including accounting information for the job, 
will be output on the device to which this label 
is assigned. 


ME 


LO 


Listing output 


Source and object listings for assemblies and 
compilations will be output on the device to 
which this label is assigned. 


ME 


OC 


Operator's console 


All JOB, MESSAGE, and FIN control commands, 
and all job termination messages will be output on 
the device to which this label is assigned. OC 
may not be assigned to another operational label, 
but may be assigned to another physical device. 


ME 


PO 


Punch output 


BCD or binary coded output will be transmitted 
to the device to which this label is assigned 
(normally a card punch). 


NO 


SI 


Source input 


Symbolic (source language) input will be received 
from the device to which this label is assigned. 


ME 


SL 


Source listing 


A listing of symbolic (source language) input will 
be transmitted to the device to which this label is 
assigned. 


ME 


SO 


Source output 


Symbolic (source language) output will be trans- 
mitted to the device to which this label is assigned. 


NO 


UC 


User's console 


This is for on-line use. The batch mode defaults 
to OC (operator's console). 


ME 


These device assignments are standard in CP-V but may be changed at SYSGEN. 
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APPENDIX D. LINK AND RUN COMMANDS CODES 



Tables D-1 through D-4 define fhe codes that may be used in the LINK and RUN commands. 



Table D-1. Library Search Codes 



Code 


Meaning 


(L) 


Specifies that the system library is to be searched to satisfy external references that 
have not been satisfied by the program. (This is the default option. ) 


(NL) 


Specifies that a system library search is not required. 


(Pi)or (Ji) 


Specifies that the ith public core library is to be searched for unsatisfied external 
references. Default is to PI if no other public core library is specified. Only one 
public library of each type (J and P) may be associated with a program. 


(FDP) or (PO) 


Specifies that the FORTRAN Subprogram library PO, that includes the Debug rou- 
tines, is required. 


(NP) 


Specifies that a public core library is not required. 


Note: The sequence of the library search is as follows: User libraries are searched first, the public library 
is associated, then the system library is searched. 



Table D-2. Error Displays 



Code 


Meaning 


(D) 


Specifies that all unsatisfied internal and external symbols are to be displayed at 
the completion of the linking process (including library searches, if specified). The 
unsatisfied symbols are identified as to whether they are internal or external and to 
which module they belong. 


(ND) 


Specifies that the unsatisfied internal and external symbols are not to be displayed. 


(C) 


Specifies that all conflicting internal and external symbols are to be displayed. The 
symbols are displayed with their source (module name) and type (internal or external). 


(NO 


Specifies that the conflicting symbols are not to be displayed. 


(M) 


Specifies that the load map is to be displayed upon completion of the linking process. 
The symbols are displayed by source with type resolution and value. 


(NM) 


Specifies that the load map is not to be displayed. 


Note: The normal default options are D, C, and NM. 
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Table D-3. Symbol Table 



Code 


Meaning 


(I) 


Spetcifies that internal symbols of the next module specified are to be Included in the 
load module. (This is the default option. ) 


(NI) 


Specifies that internal symbols of the next module specified are not to be included in 
the load module. 



Table D-4, Execution 



Code 



Meaning 



(E X, acct [, acct] . . . ) 



Specifies those accounts which may execute this load module. Up to 8 accounts may 
be specified. The value ALL may be used to specify that any account may execute 
the load module. The value NONE may be used to specify that no other account may 
execute the load module. 
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APPENDIX E. SPECIAL TERMINAL KEYS 



Certain terminal keys, key sequences, and key combinations cause action to be taken other than simple transmission 
of the character. Table E-1 illustrates these key sequences and the action produced. 



Table E-1. Special Terminal Keys 



Key Sequence 


Action Produced 


@E 


Sets or resets the flag that controls the echo and no-echo modes. 


©F 


Causes end-of-file action on input. 


' I or ic 


Functions as a tab key. 


©L or L^ 


Causes spacing to a new page and printing of new page heading. 


©© or @@ 


Simulates ci local line feed. No activation occurs. 


©S 


Sets or resets the flag that controls space-insertion mode. 


©T 


Sets or resets the flag that controls tab simulation. 


©U 


Sets or resets the flag that controls translation of lower case characters. 


©X 


Erases current partial input line. 


X^ 


Erases all pending input and output including messages typed ahead. 


© or © B 


Causes an interrupt and return of control to processor, if processor has break control; 




otherwise control goes to TEL. More than three BREAKs cause return of control to TEL. 


©or® 


Causes a carriage return. 


e 


Deletes the last character received. 


YC 


Causes an interrupt and return of control to TEL. 


©c 


Sets or resets a flag that controls tab relative mode. Input messages are adjusted to 




compensate for carriage offset at beginning of input. 


©) 


Shifts to lower case. All subsequent input is translated as lower case until instructed to 




shift to upper case. 


©( 


Shifts to upper case. All subsequent input is translated as upper case until instructed to 




shift to lov/er case. 


@Q 


Requests system acknowledgement. The system will respond immediately with two 




exclamation points (! 1). 


©O 


Toggles the backspace edit mode. 


©Z 


Allows coupled terminals to converse without feeding any input to running programs or 




processors. 


©W 


Causes all pending output to be deletedandall future output to be discarded until a read 




request is issued to the terminal for which a complete record has not been typed ahead. 


@H 


Causes output processing to holt immediately. 
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APPENDIX F. USE OF THE 2741 TERMINAL 



This appendix is intended for the person who would like to use the CP-V Time-Sharing User's Guide, but can not 
because his terminal is a 2741 terminal or a terminal that is designed to operate like a 2741. Not all features of 
the 2741 are discussed —only those that are needed to do the examples in the User's Guide. For a more detailed 
discussion of the differences between the 2741 and Teletype terminals, see the CP-VAS Reference Manual, 90 09 07. 

It is recommended that you do each of the examples in this appendix at your terminal to be sure that you understand 
them. Then turn back to the front of this User's Guide. When doing the examples, use the 2741 equivalent where 
needed instead of the Teletype entry. Differences between Teletype and 2741 control characters are summarized in 
the CP-VAS Reference Manual, 90 09 07. 

CONTROL CHARACTERS 

All time-sharing terminal devices have at least one key on their keyboard that allows them to send special control 
messages to the Monitor. These messages are called control characters. On the 2741 terminal, most control char- 
acters are sent by first pressing an alphabetic key and then pressing the ATTN key. The Monitor signals the user 
that it has received the control character by backspacing and underscoring the letter he typed. It then performs 
whatever function the user has asked for. 

For the remainder of this appendix, the sending of a control character will be described by specifying the letter, 
followed by the symbol that represents the ATTN key (@)). For example, the user may request that his current line 
of input be retyped by entering the letter r, followed by ATTN. This is presented here as the r (*^ sequence. 

Table F-1 summarizes the differences between 2741 terminals andTeletype terminals. You will find this tablehelpful 
throughout the manual. As you encounter each Teletype control character in the text, you will be able to choose 
the appropriate 2741 equivalent. 



Table F-1. 


Summary of Differences Between 2741 and Teletype Services 




Function 


Teletype 


2741 


Get log -on message 


BREAK (if hardwired line) 


* and CRLF if dialing up. 
line is already connected. 


ATTN if 


Erase line 


ESC X 


None 


Tab relative 


ESCC 


C ATTN 


Suppress lowercase 


ESCU 


U ATTN 


Uppercase shift 


ESC( 


(ATTN 


Lowercase shift 


ESC ) 


)ATTN 


Erase last character 


RUBOUT 


BACKSPACE ATTN 


Tab 


ESC I, CONTROL I 


TAB 


End of input 


FS, RS, US, GS (l", n", 
Ocs, M«) 


SPACE ATTN 


Line continuation 


ESC CR, ESC LF, LOC CR 


N AHN 


Retype 


ESC R 


RATTN 


Toggle tab simulation mode 


ESC T 


T ATTN 


Toggle space insertion mode 


ESC S 


S ATTN 
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Table F-1. Summary of Differences between 2741 and Teletype Services (cont. ) 




Function 


Teletype 


2741 


End of file 


ESC F 


F ATTN 


Monitor escape (to TEL) 


ESC ESC, CONTROL Y, ESC Y, 
or 4 BREAKS 


Four ATTNs. Also, Y ATTN 


if input. 


Break 


BREAK 


B ATTN on input or ATTN on 


output. 


Toggle backspace edit' 
mode 


ESC O 


O ATTN 


Form feed 


ESC L 


L ATTN 


Half duplex paper tape 


ESC P 


None 


Toggle ECHO mode 


ESC E 


None 


Acknowledge 


ESC Q 


None 


Erase all input and 
output 


CONTROL X 


X ATTN 


End of transmission 


CONTROL D 


ATTN 


Halt output 


ESC H 


None 


Ignore output 


ESC W 


None 


Ignore input 


ESC Z 


None 



LOGGMGON 

To log on to CP-V on a 2741 terminal, you must first dial the phone and place the handset in the audio-coupling 
device. When you have established contact with the computer (in most cases, this is signaled by the unlocking of 
the keyboard) you must identify your terminal's specific character set by typing an asterisk, followed by a carriage 
return. CP-V will then be able to communicate meaningfully with your terminal. CP-V responds to your terminal 
identification with a request for you to log on. 

* @ 

XEROX CP-V AT YOUR SERVICE 

ON AT 22:29 SEP 26. '72 

LOGON PLEASE; 1234, JONES® 

! 

Note that Jones was typed with all uppercase letters. This is required unless you inform the system that you wish 
all alphabetic characters to be treated as uppercase. The exclamation point indicates that your log-on has been 
accepted and the system is now ready to accept TEL commands. 
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SUPPRESSING LOWERCASE LEHERS 

There are manycases where lowercase letters will not be accepted in lieu of uppercase letters. The log-on sequence 
described above is one example. If lowercase letters are used when logging on, an error message is output. To 
avoid this problem the user must either remember to use uppercase letters when required or enter the u (@) sequence, 
which suppresses the lowercase letter capability and causes the system to treat all letters as if they were uppercase. 

V. @ 

XEROX CP-V AT YOUR SERVICE 



ON AT 22:57 SEP 26, '72 
LOGON PLEASE : 1234, j ones © 
ACCOUNT/ ID 1234/iones? 
LOGON PLEASE: uI234,jones© 
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In ^his example, the user forgot to use uppercase letters when he logged on. The system responded with an error 
message and asked the user once again to log on. This time the user entered the u (*ttn) sequence, requesting that all 
letters typed be accepted as uppercase letters. He then reentered his account and id, and it didn't matter whether 
he used uppercase or lowercase letters. If he wished to use lowercase letters later in the session, he could reset 
the lowercase suppression by entering another u (i^ sequence. 

The u @> sequence was entered by typing the letter u, and then pressing the ATTN key. The system acknowledged 
receipt of the sequence by backspacing and underscoring the u. 

CORRECTING TYPING ERRORS 

Each character that you type while logged on to CP-V is sent when you press the key. However, in most cases CP-V 
simply stores what you type until you press the carriage return. At that point, the entire line of information is pro- 
cessed. As a result, corrections can easily be made at any point in a line of input prior to pressing the carriage 
return. 

The backspace (^ sequence most often is used to make single corrections to typing errors. To correct the last 
character typed, press the backspace key, then the ATTN key. The letter you now type will replace the letter that 
you are typing over, 

J_build sample @ 

1 .000 ooooodi © 

2.000 @ 
_[_copy sample @ 
OOOOOI 



In this example, a file name "sample" is created using the TEL BUILD command. The file contains one record, and 
was typed originally as six letter o's. A backspace sequence was entered, and the last o replaced with an i. 

When the TEL COPY command was used to copy the file to the terminal, the file was printed in all uppercase letters. 
This happened because we had used the u (@) sequence earlier to cause all letters to be treated as uppercase. If you 
wish to delete more than one character, simply enter the backspace @) sequence once for each character to be 
deleted. 

^build samp lei © 

1.000 ooodxbd) ® 

2.000 @ 
j_copy samp lei @ 
OOOIII 

In this example, six letter o's were entered in the only record of a file named "sample 1". Before entering a carriage 
return, however, three successive backspace sequences were entered. Three letter i's were then typed to re- 
place the deleted characters. Again when the file was output at the terminal by the TEL COPY command, all upper- 
case letters were typed since ihe earlier u sequence was still in effect. 

ruBUILD newfile @ 

1.000 oo44o(b @ 

2.000 © 
jCOPY newfile @ 
ooll i 
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At thrs point, a u <@) sequence was entered so that typed lowercase letters would no longer be converted to 
uppercase. As a result, the TEL BUILD command had to be typed in uppercase. Also, it is important to note that 
the name of this file is "newFile" and that it can only be referred to in lowercase letters. In the only record in 
this file, six letter o's were typed, then four backspace sequences were entered. Two uppercase I's were typed, 

followed by a space, one lowercase i, and a carriage return. The result was a record containing ooll i. 

USING TABUUIiTION 

The TAB key on the 2741 terminal operates in the same way as the TAB key on a standard typewriter. Each time the 
TAB key is pressed, the carrier moves to the next tab stop. The place where the carrier stops is determined by the 
physical tab setting on the machine itself. In addition to this typical typewriter feature, the 2741 also sends a tab 
character to CP-V each time the TAB key is pressed. When information is being typed from a file, a tab character 
causes the carrier to move to the next tab stop on the machine just as pressing the TAB key would do. 

J_build samples @ 

1 .000 one @ two @) three © four @ 

2.000 @ 
_!_copy samples @ 

ONE ;rwo thre :e four 

In this example, a file named "sampleS" is created. The physical tabs on the terminal were set to every five posi- 
tions (i.e., 5, 10,. . . ). The file was then copied back to the terminal. If we change the physical tab stops on 
the terminal to every fifteen positions (i.e., 15, 30, . . .) and copied the file again, the following would result: 

_!_copy samples @ 

ONE TWO THREE FOUR 

In this example, the file named "sample3"was copied to a 2741 terminal with physical tab settings at every fifteenth 
position. 

The TEL TABS command is used to inform the system of the tab settings that the user has at his terminal . If you plan 
to use tab settings, you should inform CP-V of the settings you plan to use. 

_!_TAB 5,10,45 @ 

In this example, tab settings of 5, 10, and 45 were specified for this terminal. If you wish to specify or change tab 
settings, enter them any time that the system prints an exclamgtion point at your terminal. 
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Note: For each entry in this index, the number of the most significant page is listed first. Any pages thereafter are listed in 
numerical sequence. 



2741 terminal, use of, 114 



APL, 53 

APL command, TEL, 53 

assign/merge table, 83 



COPY command. 

Edit, 18 

PCL, 30,96 
COPYALL command, PCL, 96 
correcting terminal input, 9 
CP-V, 1 



B 



BACKUP command, TEL, 95 

BASIC, 36 

BASIC, 

abbreviations of command verbs, 44 

DCB requirements, 88 

desk-calculator mode, 42 

direct statement execution, 42 
BASIC command, TEL, 36 
BASIC commands, 

CLEAR, 38,40 

EXECUTE, 43 

FILE, 40 

LIST, 39 

LOAD, 38,40 

NAME, 40 

PRINT, 43 

RENUMBER, 41 

SAVE, 38 

STATUS, 39 
BATCH command, TEL, 99 
batch jobs, 99 
BP command. Edit, 77 
BREAK, 76 
BUILD command. 

Edit, 18,29 

TEL, 18,29 



CANCEL command, TEL, 100 

character deletion, 9 

character echoing, 5 

CLEAR command, BASIC, 38,40 

COBOL, 49 

COBOL command, TEL, 49 

command syntax notation, vii 

COMMENT command, TEL, 83,89 

connection with the computer, 4 

CONTINUE command, TEL, 78,92 

CONTROL I, 13 

Control Program-Five, 1 

CONTROL X, 9 

CONTROL Y, 76 

controlling output, 89 



D command. Edit, 27 
Data Control Blocks, 82 
DCBs, 82 

DCBs, standard system, 82 
DE command. Edit, 20 
debugging user programs, 61 
DELETE command. 

Edit, 18 

PCL, 31 
DELETEALL command, PCL, 31 
deleting terminal input, 9 
Delta, 61 

debug mode, 61 

nondebug mode, 63 

writing programs, 65 
dialing the computer, 4 
DONT COMMENT command, TEL, 89 
DONT LIST command, TEL, 89 
DONT OUTPUT command, TEL, 89 



E 



Edit, 17,15 

file editing commands, 17 

intrarecord editing commands, 26 

record editing commands, 18 
EDIT command. 

Edit, 17,29 

TEL, 17,29 
Edit commands, 

BP, 27 

BUILD, 18,29 

COPY, 18 

D, 27 

DE, 20 

DELETE, 18 

EDIT, 17,29 

END, 18 

FD, 24 

FT, 24 

IN, 20 

MERGE, 18,23 

S, 26 

SE, 26 
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119 



Note : For each entry in this index, the number of the most significant page is listed first. Any pages thereafter are listed in 
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TS, 27 

TY, 18,27 
END command. Edit, 18 
error displays, 112 
ESC E, 5 
ESC ESC, 76 
ESC I, 13 
ESC RET, 25 
ESC S, 13 
ESC T, 13 
ESC X, 9 
ESC Y, 76 

EXECUTE command, BASIC, 43 
executing object programs, 57 
executing user programs, 72 



LINK command codes, 112 
LINK command, TEL, 57 
linking loader, 57 
LIST command, 

BASIC, 39 

PCL, 31 

TEL, 83,16,89 
Imn command, TEL, 72 
LOAD command, BASIC, 38, 40 
load module, 15 
loading object programs, 57 
LOC CR, 25 
logging on and off, 4 



M 



F 

FD command. Edit, 24 

FDP, 66 

fid, 15 

FILE command, BASIC, 40 

file extension, \6 

file identification, 15 

file identifiers, 108 

file organization, 16 

file storage, 15 

file/device assignment, 82 

files, 15 

FORT4 command, TEL, 45 

FORTRAN, 45 

FORTRAN Debug Package, 66 

FT command. Edit, 24 



GET command, TEL, 92 
GO command, TEL, 92 



I 



IN command. Edit, 20 
input data, 15 



JOB command, TEL, 100 



L 



language processors, using, 36 
library search codes, 112 
line deletion, 9 
LINK, 57 



MAILBOX file, 5,95 
MERGE command. Edit, 18,23 
MESSAGE command, TEL, 101 
messages from operator, 101 
META command, TEL, 51 
Meta-Symbol, 51 
modifying terminal input, 9 
multiline records, entering, 25 



N 



NAME command, BASIC, 40 



object code, 15 

ON modifier, 16, 18 

operator, communication with, 101 

OUTPUT command, TEL, 83,16,89 

output, controlling, 89 

OVER modifier, 16 



page width and length, changing, 10 
PASSWORD command, TEL, 6 
PCL, 29 
PCL commands, 

COPY, 30,96 

DELETE, 31 

DELETEALL, 31 

LIST, 31 
Peripheral Conversion Language (see PCL), 29 
PLATEN command, TEL, 10 
PRINT command, 

BASIC, 43 

TEL, 91 
printing, suppressing, 5 
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processors, getting in and out of, 76 
processors, on-line, 2 
program aborts, 80 
programs, executing, 72 



QUIT command, TEL, 78 



RENUMBER command, BASIC, 41 
restoring files and core images, 92 
rubout character, 9 
RUN command codes, 112 
RUN command, TEL, 57 



S command. Edit, 26 
SAVE command, BASIC, 38 
SAVE command, TEL, 92 
saving files and core images, 92 
SE command. Edit, 26 
SET command codes, 109 
SET command, 

DCB assignment codes, 109 

device options, 109 

file options, 1 10 

TEL, 85 
source program, li) 
special terminal keys, 113 
standard system DCBs, 82 
START command, TEL, 59,72 
STATUS command, BASIC, 39 
syntax notation, vii 



tabbing, 13 

TABS command, TEL, 13 

TEL, 1 

TEL command summary, 103 

TEL commands, 

APL, 53 

BACKUP, 95 

BASIC, 36 

BATCH, 99 

BUILD, 18,29 

CANCEL, 100 

COBOL, 49 

COMMENT, 83,89 

CONTINUE, 78,92 

DONT COMMENT, 89 

DO NT LIST, 89 

DONT OUTPUT, 89 

EDIT, 17,29 

FORT4, 45 

GET, 92 

GO, 92 

JOB, 100 

LINK, 57 

LIST, 83,16,89 

Imn, 72 

MESSAGE, 101 

META, 51 

OUTPUT, 83,89 

PASSWORD, 6 

PLATEN, 10 

PRINT, 91 

QUIT, 78 

RUN, 57 

SAVE, 92 

SET, 85 

START, 59,72 

TABS, 13 

TERMINAL, 10 
Teletype keyboard, 3 
TERMINAL command, TEL, 10 
Terminal Executive Language, 1 
TO modifier, 18 
TS command. Edit, 27 
TY command. Edit, 18,27 
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